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T PLAN bie 


3 nes ie 
BUENA WRITING, REEOING, ie ING, Tepe POSITIONING, EDT ~ BOF 


ear U ms Gee SROER 10 PROvibe F 


DURING A TEST CYCLE CKS ARE FOR STATUS ERRORS, DATA ERRORS, 
POSITION ERRORS, WORD ADDRESS ERRORS 
WHEREVER FPPC TCALE BETECTED BY THE TMOe. 


REQUIREMENTS (HARDWARE ) 
ANY poe one 1 PROCESSOR - WITH OR WITHOUT HARDWARE SWITCH REGISTER 


a 
F babe 


CONTROLLER 
1 10 3 MAG TAPE DRIVES 
CONTROLLER 


LOADING PROCEDURE 


USE STANDARD PROCEDURE FOR LOADING BINARY TAPES 





EOL 


(PAGE 2): 
STARTING _ PROCEDURE 


FOUR (4) STARTING ADDRESSES THAT MAY BE USED; 


THERE ARE 
20018), 204(8),210(8),AND 240(8): 
“ENTEREL TART FROM 


tf LE A Sm RS 






ars pon ad tite 


Fe seiiiNe ) WILL ve T | 
BEVERAGE BF WN asso acne 


C. 21018): nus ADORE: T pareve TeRs THE FOREVER, THE N TWAT THe 
RUBE NESTS MUTATE MGIB Se 
D. 24018): poi ree : ca Web CAUSE THE 


SUI Folie cited AI Ba 


A . 
VE 
CONTINUOUS OPERATION ON OF THE’ SEQUENCE, os ae oY, 
SEE ITEM 11. (PAGE 24) FOR FULL DETAILS 


E. 300(8): THIS iPODRESS IS 70 Be Be ty Bahco) cacort™ Par 


HE PARAMETER INPUT ConeTSTE OF 
ane AITY, rie ee a 
“eh a 


aK) 


SEQ O00S 





REGISTER START: 


VECTOR ADDRESS: 


DRIVE NUMBER: 


SLAVE NUMBER: 


GOl 
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THE FOLLOWING IS AN EXPLANATION OF THE INITIAL 
START (200 OCTAL) REQUESTS AND RESPONSES: 


BeBe RARE TP FIR hoses, 


BTR Te Tree THIS tae 
Is 10 By he Pe Nee. vECTOR 
(3) DIGI ADDRESS. 


THE DRIVE ( 


OF The THoe) 18 ENTERED As. ONE. (1) 
See ee et AND MUST BE WITHIN THE LIMITS 


Sela 


Ry ghee OALY. 


DENSITY: 


FORMAT: 


HO1 


(PAGE 4) , SQ 0007 


CEST 18 RESPOOED To By | 
ak: Be ris bs ae hae 


ak 
12 oo 


BLL RASA Sah? 


g =YCORE DUMP (FOUR FRAMES PER BORD) 


RECORD COUNT: THI a ae ee 
WILL PEORD 
iB a ie fs aA 


pene een ‘cuepect Be Wate ok tH yo. AGAIN 


ts " es ae 


THE SAME BLOCKING I ON ALL AVAI 


PATTERN wees 


I01 
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aa ae SUIntrS. OF (2) CHARAC 
i a ED E ns Lele ROH Oat 
a 7. 


OM LOCAT Es Bite OR 300(8). 







a ee EE 7 


INTERCHANGE READ: THIS REQUEST IS eins TO 


5 INAe 
ki oo 
ne, T9. 


i CAUSE READING IN NORMAL, MODE 


JOl 
(PAGE 6) 
SINGLE PASS: as REQUEST IS RESPONDED TO BY EITHER A as (1) 


nee daha THe TEST 
aa a Passes. 


AT ENO Or PASS, ROO FTL 


STALLS: TO BY A SIX (6) 
Rae TS law 


rate Hey ie 
READ: scALTET Rw 
WRITE: THE TIME DELAY BETWEEN EACH RECORD WRITTEN 


pcan a GARD TO REVERSE, ETC. ) 
FIXED PARAMETERS; bee oT EXCEPT 
NOMINAL 


ne Ene aT ST ere ) IS TYPED. 
[a 


a iat 
& 
THE 
PARARE TERS GILL Re REFLECT Thee F RED Bore uel Er STORED 
N THE PROGRAM. 


a 


terre 
= and 
oOo 


KOl 


(PAGE 7) Neches 
SAMPLE START AT 200(8): 


ek a 


LOAD ADDRESS 200(6), SET CONSOLE SWITCHES, PRESS START SWITCH: 


mye alia (REFER 10 SEC 7 Adele OPTIONS). 


N OCTAL 
+32 FA Phd hee age 172440) 


a SN: S009 


FORMAT =( M4) 


ee 
TM=(0) 
INTERCHANGE READ=(1) 
SINGLE PASS=(0) 


STi 
a, 
Ss 
sath AROUND=1 (3000) (CR) 
WILL NOW PERFORM THE TEST CYCLE SET I 


es Sachs Tete att oe is 


YS ARE SET 
FOR A NINIRUM ON ON REAO A AND WRITES Re BO aftr 78 
SE ON TURN AROUND. 


NO TAPE MARKS WILL BE WRITTEN AND ALL READING 
WILL BE DONE IN INTERCHANGE MODE (MAINT MODE 0001). 





DATA PATTERN PATTERNS 


LOl 
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ad Aa far of ne Oe Soren 
poe ae ie ae AINS 
ep: Bloc 


ale ON’ OF ye ars Lap be, tee intel 
ae fees 


GENERATED GY THE HARDWARE IN NAZI OR WATTES. 


THE FOLLOWING IS A LIST OF THE DATA PATTERNS AVAILABLE: 
READER (SEE DTC) 


ae at ce 
a ie a sr WEE a PB 
Ce 


TAle: I bercies 
ia: ie oF wie ns AND ALL ONE BITS 


TAL4: oe: vied} eee b RAACTERS 


-_—— -——--—— —- 


SEQ 0011 





MO1 
conat - SEQ on12 


6. RANDOMIZATION 


CATER 





REO The Rtn Tire fe RUT! cers Te sae 
area om 


epee 
tae SENS 7 

C. pat ew TCH 6) 
an FRE. 


IS H Brock fC AVAILABLE UNIT BEFORE 
es RESETTING SUITCH & HOLDS LAST VALUE 


(PAGE 10) 
7. DYNAMIC PARAMETERS: 


Rea 
EO EP AP oe 


PROGRAM WILL RESPOND TO INPUT 
T 


NOL. 


SEQ 0013 


(PAGE 11) 
CONSOLE SWITCH SETTINGS 


mals 


CONTROL : 


REGISTER (0 (L0C. 176) voi Zes,FROR Hee TTY. THES LONG OF OUT EKER Eee TCH 
1) TYPE CONTROL G <6); THIS HILL ALLOM T TO ENTER DATA INTO 


A) THI Sa WI PrOGha <t@> EITHER IN FLAG MODE OR INTERRUPT 

rie ye Oayaen Te 

NICE THE 
PRIORTY IS ie TO ALLOW ee 


2) he tes Mt en re 5 pperoctee (XXXXXX crs THE OCTAL CONTENTS 
3) Ge Paice a tite ne Co oe Oe 
* ERE BEN EP AL SHER 
tr 4 CR) FIRST KEY DEPRES “= SOFTWARE SWITCH 
REGISTER WILL NOT BE 
8) “poatey et IS DEPRESSED THEN THE PROGRAM WILL SEND YOU 


M3 corso SHIT! Syn TO « uP ae Te heE CYCLE 
ame 
CONFIGURATION. ALL i set TO ZERO(O) IS NORMAL. 


SW15: TOP ON ERROR 
(100000) INUE ON ERROR 


oath nT 4 MRITE STATISTICS 


SW13: =00 NOT CHECK DATA ERRORS 
(020000) CK DATA 


SWi2: 1200 NOT ERRORS (NOR CLEAR THEM IF THEY DO OCCUR) 
(010000 )0=CHECK WRITE  tatUS rane 


SW11:  1=D0 NOT CHECK READ STATUS ERRORS (NOR CLEAR THEM IF THEY DO OCCUR) 









3€9 0015 











(004000) 02CHECK READ STATUS ERRORS C02 
“SUID; A200 NOT PRINT Atty ERRORS CEXCEPT CATASTROPHIC ERRORS) 





A mates TAPES 





oid000)0=50 NO 
Costo00 O=uSeb FINED DATA 

Bone00,0=USE FINED CHARACTER COUNT 
(0801000=USED FINED RECORD COUNT 
CaBDOvODD=DO AT YOZELE ON RECORD 
fovoozo debe not RETRY 
Topbor0DB=READ FORMARO 


AERO ROT RED EVERSE 










PO60004) 
Toddone B=READ REVERSE FIRST 


SWO: =D0 NOT WRITE 
(008001) D=kRITE 





(PAGE 12) 
SWITCH EXPLANATION AND EXAMPLES: 


SWO-3: TH eee TO. CONTR scare 
The ot STS AT INIT 
> bd | 4 
e V UNTIL 


















Pe TART 


ALL UTS HAVE 





ea ult ELE Toe 


Paints oT IS i 


AVA 
EXAMPLES: O-3 . 


A. 0=0, SW1=0, SW2=1 , SW3=1 
Pr ITE ONLY X RECGRDS OF Y CHARACTERS 


~ BRITE’ THEN BRCKSPACE AND READ FORWARD X RECORDS 
-  TRITE’ THEN READ REVERSE X RECORDS. - 


D.. ,SW1=0, SH2=0, SW3=0 
BRITE’ THEN READ REVERSE AND READ FORWARD X RECORDS 


E. SwWO=0,SW1=1, SW2=0, SW3=0 cS. 
WRITE’ T THEN BACKSPACE' AND READ FORMARD THEN REVERSE 3 


F.  SHO=1,SWl=0, SW2=1,SH3=0 
6 READ TAPE REVERSE’ i RECORDS 
| ” READ thee REVERSE’ THEN. FORWARD 
T+ READ TAPE FORWARD’ THEN REVERSE 


— eee ee mom + 


SW6-8: 
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SWITCH FOUR (4) 
A RE! 


<1 ' 


HEN Bale 2, WILL 





TA 


THE RANDOMIZATION 


fe ra 
FO SET TARY TIN ae 
: RAKE PLACE BE R CYCLE 


SWI 

AVAI T TO AT 

THE T Arai hs re. TESTING 
WILL T A BLOCK C 


ee ees = - 


ALL UNITS HAVE REACHED BOT. 


SEQ 0017 


FO02 


(PAGE 14) ones nage 


SW19-13: 33 ReTOL ING, ARE Oe TO CONTRO THE 
TON DESCRIBED BY SWITCHES 0-3. 
SPERATION IBED BY SWITCHES 0-3. — 


BETES UPR TD nc 
"TneoRnATION PRINT CATASTROPHIC 
eu ha elk Meter, Pa Bn 
; Ht Ao SoRSRS Bt RECLE cna 


C. Cn ete tie (12) WHEN sete oe Sratus 
ibe a eG. 
TS DUTT BL LS Te me 


DATA.- THIS > Saat HAS NO EFFECT ON 
STATUS CHECKING 


Sar ciate eink on eit nee GED oe Tati emo 
SW14: SHI a ie FOURTEEN ( pe ie One (4) He ne Suh 
i 


foce ee PRIN NUMBER OF BITS 
WRITE ERRORS, 


SWS: SWITCH F (1S) WHEN SET TO A 
aa ae cg 


I T ) : He Hesspc 
I THE WHICH CAUSED HAL 
WILL BE PRINTED BEFORE TESTING IS RESUMED. 


###22PROGRAM HAL TS#eett 


oa ie Ten nee SWITCH RE ister of “USED AND THE PROGRAM 
TOR TO ence G BEFORE HITTING 


care UE AUT, GaROOR TLENTEN ATEN 


XXXXXX NEW= “(REFER TO SECTION 8 FOR OPERATOR OPTIONS). - 


_ ee es 


G02 


(PAGE 15) , _ SEQ 0019 











ERROR PRINTOUTS 
THERE ARE. THREE TYPES OF ERROR PRINTOUTS. MROE_BY ie 
ee a ae 

NSITY, Ye oe Bo ack Hee ir rie RRO THE BLOCK NUMBER, 
a. Cenarion ERRORS: 


THESE ARE ERRORS wfc can OCCUR AS a 
1. READ/WRITE STATUS ERRORS: THBELe OR, Br he reese CONTROLLER pie 
TA ERRORS WILL BE REPOR 

2. TAPE POSITION ERRORS: Beet Oe, Feu nD OPeRaT sen Fneaeen 
B. DATA ERRORS: 

pore Ereons ie 

oe 

a0 Be COUNTED Da eres 


SA Ae Ba LE HI ae 


THE ENTIRE Recoho T TQ READ INCORRECTL 
be setae Le Sati ron —— 


ry I 


(BAD KippeD nd ger TEnS 
SS Rice eats Heel de 
RE coo erste 


TO "LAST TER 10) CHARACT mich L ae 
. NG AND SUMPTION GE CHEEKING 
WILL Y Be DONE On RECORDS WHICH ARE LONG 





H0e 
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C. CONDITION ERRORS: (CATASTROPHIC) 


DSTI WE EAR ME HE STO 


l. 


6. 


- NO INTERRUPT 


EOT: a T unite, I . I 
aca ~ 


file RESUHED ON 


ILLEGAL BOT: we A ENCOUNTERS BOT DURING 


hoe Arbo ATED oid Tie “pRocae pena tED: ol Pith 


NG CONTINUE; BUT A RESTART 


INATED BY ME SETTING OF 5 Re INTERRUPT 1 
te ee 


NO MEDIUM “Ure aren IS A 


AN ERROR I a Peden sroPreD. 
tiie Any Be RESURED SSING CONTI 
NO BOT ON REWIND: AS EACH H_SLAVE IS REWOUND 8 
TION A T BOT 


18 als Or 1s 80 Posi N COMPLETION OF 
WILL MALt. Beil Ph PedNTED IME peu 
POSITION ERROR: ove NI moe iidadal ar 


AT BLOCK 


. BAD TAPE OVERELCH: TE (8), nfeDe he tebe enon 


TING UNITLL 
RESTARTED AT BLOCK 


. HARD READ ERROR: IF ANY HARD ES ENCOUNTERED 
DURING A RETRY, A SSAGE PRINTED 
RERANGLEse OF THE SW10. 


9. 


NON-RETRYABLE: IF ANY NON-RETRYABLE ERROR IS ENCOUNTERED 
MESSAGE IS PRINTED REGARDLESS OF THE SETTI TING OF 


oe ee ee ee ee 


f 


PEP PPP se é 


ou 06 08 00 08 08 00 00 Oe Oe 08 te a8 
0 tt— 


SEQUEL eVesehaRexmerReE sos 





J0e 


SEQ 
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Be a 


es oa ee 
a a 
a fa 7 Lat ad oi oe ee 


be dap’ 

EXAMPLE IN Mm 5 The, AY 600 GPT IN EVEN sly USING 
ro STA Laie by ING. 
ane SU as 

Seaside tl ich te BPRS 

ECIED BAD IS PRINTED att Bh 


NO. 2 #SLAVE NO. Sie ie nw. 
g,2RN 10-25 #RS 20 #RE R 


oo  —_- 
- 
= 


es 


GEGRERES geo 


ee ee et — -- -- 


K0e 


SEQ 0023 
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gee oes 


FOUR (4) AND SIX (6). 


2 
SOL OVE 10, 3 aD gw 1 oF IN PRT @ 
10-2S #RS 20 #RE 


ASSOCIATED HLTH 
BAD (OR WAS 
STA 
CHARAC 


2 #SLAVE NO. 3 #D 


#RN 10-25 #RS 20 #RE 


44270 


3 S 
ais & 


hemes sabes 


od 


le 
1 
IN 


EXAMPLE 4 


SORE ee Bom 


wee eas 


LOe 
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EXAMPLE 5: THIS EXAMPLE SHOWS A READ DATA 


So a i or 
LTV ey cadit 7 


EXAMPLE 6: RESUT OF 8 ro OL Seo se he 


DRI NO, 2 ASLAVE 10. reece 


M02 


SEQ 0025 


matlcke Loz wow i 
a aE TM 
) PRINTOUTS - 
RETRY WHICH NOT 
WHICH 
at OR 





L ed 


, ere ee oS 
#RS 667 #WE 


BABAS 
<8 3553 


oe 
4.09 
: 





ram 
BS 
~ 


a2 Sta2* 
i 


1 LPS Me Laat? Oo 


Sor He ia bak”? 


a 
a 


BRERS 
"s 


400 
wo 
oom PU PES SUE 
DRIVE NO. 2 #03 *#P 0 #F 14 


NO. 
NOT BOT ON REWIND: FAL 


Cee Ts Oe ora tee ene Oe 


NO_INTERRUPT RETURNED AT THE END 
OF AN OPERATION. 


DRIVE NO. 7 NO. 7 #0 2 #P 1 #F 14 
ee 1200 
NO INT 


N02. 





B03. 


(PAGE 23) 2 





STATISTICS PRINTOUT 







NG URI UROER TO Sie CERTAIN 






Pk i 


TI 
sea Hist nay Be IRTED. aT a ee ie Pee pial OVERFLOW) 
My oe 7 re Tie. stat 165 WILL UPON renconmence THE 


une 


STATISTICS PRINT EXAMPLE (A HEADER WILL PRECEED THE STATS) 


1 


_ 
S 
w 


z sagseuicetegs: 


TH ony 


ce ares 


Aantal 





bobboe 


~ 
oOo 


fOr tutu 


33 
5s 


ag 
Z 
oat al 
; 
*% 
a 


wo 

id 

sa 
its 
uw f-, 
tw 
Www 
fur 
-a 
orm 


ee garoane EET 


eA WITH BAD TAPE 


fe 
ORE COVERED READ 

ORWARD DATA ERRORS Mit NO ASSOCIATED STATUS ERROR 
REVERSE DATA ERRORS WITH NO ASSOCIATED STATUS ERROR 


RSRRaRATS 











C03 













il. AUTO SEQUENCE 
THE AUTO SE (START AT ADORE aries gr cach 
S Sarit & Geren rg ype 
CYCLE AND RZ BE 


N ACTIVE ae MAY 
a tata REN Ur nea Om 
SAMPLE START AT 240(8): AUTO SEQUENCE. 
LOAD ADDRESS 24018), SET SWITCHES TO ZERO, PRESS START: 


ENTER CONDITIONS IN ETAL 


CTR AORE sreet SS ne 


0 CONT: MD 


Pe eh ce tsar ata TART WITH THE RH 
Teno. Av 8 VECTOR 224. ALL AVAILABLE 


HARDWARE, HILL Be TED CONTINUOUSLY IN BOTH NRZ AND PE MODE: 
ARE FOUND, ae {yibeR ee 


ce UF fee! Beaten e BY A NTOUT 
Le une: ae 


Br eh ve HARDWARE Mae 7? Fine bo Tug 
ETIHER HAL ) OR RESTART uITH 
THe FIR FIRS AVATLABLE. UNT 9 CONT = 1). 









(PAGE 2S) 
AUTO SEQUENCE TEST PLAN: 


Se Bean 


os (6) BLOCKS 5 OF oe yes 1100) RECORDS 
EACH OF bath PATTERNS. 


PA I: ALL ONES DATA IN Abt BYTES 

PA 10: WALKING ONE/ALL 

PATTERN 14: WALKING ZERO/ALL ZERO | 
TA: | RANDOM 








2. PE CYCLE: (IF NRZ ONLY = 0) 


tr Be crite ( TERS ERO FOR 


THREE DATA 
Bata BLOGKS 0 END OF T 


Hes i: Wes se 
PaT 14: 
PAT 15: TWO_(2) ALL CHARACTERS, THREE 0 CHARACTERS, 


THEN ¢ COMPLIMENT PATTERN. REPEATED FOR A FULL BUFFER 






E03 





i eae? ALLOW 


Siu ae RE EOD sont iner e t en ons: 


TRY IT, YOU'LL LIKE IT. 
LISTING 





Ma A DATA RELIABILITY PROGRAM MACY11 27(732) L1-MAR-76 14:46 PAGE 1 
. TITLE TMO2/TU16 DATA RELIABILITY PROGRAM 
(us genet 
if 
; CONSOLE SWITCHESHHREERREHEEE 


: srl 


Peer Ty grAts 


: SE aan DATA 
: 1300 NOT 


es 


1=REWIND TAPE 
O=00 NOT REWIND 


RPIKED at TA PATTERN 


il COUNT 


eke a Ean 
eee 
RES ats AT Me 


. 
: 
: 
: 
18 
i ) 
: 








é 


/TU 


BH BS BVER LOH Bsa dZIN-SSS CERISE SSoNERLONe SSS : 
vw 


~ 


Asean RELIABILITY PROGRAM 





MACY11 27(732) 11-MAR+76 14:46 PAGE 2 


;TULG REGISTER BI TS#eeeeeenee 





Ps * ° 
. ° ° ° 
COOOFEEOEOOO OOOOH OOOOEOEEOOOOOOEDE DEO EHOD OOOOH HOO OOOO E OOS 


o 
# 
COUNT - : 
OM MM OS SS SS 
ROBRE 
ss : 
COFOOSOCEHEE HEHEHE EEE EEE EHO OER OHHH OOO OOS 
COT ; 
. . 
(AAAAAAAAAAAAAAARRARRARAARRRRMRA RA ee 
OLT; WCE; UPE ; NED; NEM; PGE 5 FO FE; OR ;IR ;CLR;PAT;BAI;Ue ;Ul ;U0 ; 
ao a . . . o E' 2 fo 7 oo oO o 7 


\AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAL 


ATA; ERR; PIP; MOL; WRL ; EOT; SPR; DPR; DRY; SSC; PES; SON; IDB; EOF ; BOT; SLA; 





\AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
; 
. 


a 


AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 


hse . 

x 
TER : 
SCHSSOSHSSEOEE HESS S ESO EOE EEE OHSS EOE OEE OOOO EOE OE 


pare 3 
_ 

XXAXXXXXXXKAKKKAKKK KKK K KKK KKK KKK KKK KKK KKK KKK KKK 
DB ;0B8 ;08 ;08 ;08 ;DB ;08 ;08 ;08 ;WRT;MM ;O0P ;0P ;0P ;0P ; 
o 6 oe . y o . o l . . B . o _ . 





SERIAL ; H 


(AAAAAAAAAAAAA? 


FCS;T 


2 
2 
e Se 
>< 
. 
> 
. 
> 
> 
> 
a 
+> 
> 
24 
> 
> 
> 
> 
> 
a 
> 
> 
> 
2 
. 7 
> 
> 
~~ 
> 
> 
> 
. 
> 
i 
. 
+ 
+. 
a 
> 
oe 
a 
> 
> 
oe 
- 
> 
a 
+> 
2 
Shee 


£ 
g 
S 


SO SESS 66 SO SESS OS SS SESE SO SS SESS SE SESS SESE SESS SESS SS SESS SS SO ee Os ee ee 


HO3 
Twe-TUyb DATA RELIRGILITY PROGRAM — MACYLL 27(732) LI-MAR-7b 14:6 PAGE 3 Seo 0033 


;REGISTER EQUIVSeeeneeneeeee 





P= 0-9 Gh 


; TRAP CATCHERS#Heeeeeeeee 
"REPT 200 

+2 

HALT 

om BP30 

= 

340 


;TTY INTERRUPT VECTORS##eeeeEEH 


DOITN EWN ODS IPR LV OBO EL 


ee one 





it NT TTY INTERRUPT HANDLER ADDRESS 


;SOFTWARE SWITCH REGISTER LOC. 17beeexeeeee# 


000176 gahee: 0 SOFTWARE SWITCH REGISTER 
;START ADDRESS#eeeeeeeee 
ee. sTaRT sENTER PARAMETERS VIA TTY 
.=204 
000°6? O02640 jMP Ss STARTC ;USE FIXED PARAMETERS; HOLD DATA 
000210 .=210 
000210 005067 014660 éLR ROFL, 
000214 000167 002640 IMP —s STARTA ;USE FIXED PARAMETERS; NEW DATA 


;MAG TAPE INTERRUPT VECTORS##eeeeeEe 
oo0224 ata aTiat :MAG TAPE INTERRUPT HANDLER ADDRESS 
000226 00340 340 


sAUTO SEQUENCE START##eHRHRREE 


b= 0-2 2 Ob = °F 0 Oe FF b= = = 6 = 0 Bb 0 2 bb bb Bb bs 0 - + 2 2 bh p= Pe bh pe hh He HO 


SHVFHESH-SSBVRREORHBSBVRRZOWLS 
a 6 
o 






TMO2/TU16 DATA RELIABILITY PROGRAM 
DZTUAF P11 , 


1 
| 
1 


MACY11 27(732) L1-MAR-76 14:46 PAGE 4 


ihe ASEQF 


STAUT 


5 TO 0S TART 











E FLAG 
AUTO SEQUENCE — 


Pape Us ata RELIABILITY PROGRAM 


is 000300 
15 BREN BRR? LSE 
159 


be p— ps 


T . T 
A 
Dt bao a bb -2 B= 0-2 ps bo Bo Gee foes pee 


£Mo 


seeaist tre 


cay 


Be fs Bt ht PO fee Pe Ps fe De he he Phe pe ph fe fe Be fo hs Be hs be Fe Pe hs bo Po a po PP poe 
— 
Oo 


CREB SES SRR LOS SES GRAPES Sia Nol tsa see eine 








ee ee 


JO3 
MACYL1 27(72°) LI-MAR-76 14:46 PAGE S 


;SHORT CONVERSATION RESTART #tteesae 


He Sh RRTERPREDRPRRRRATaRY SAM 


-2510 
;TULG REGISTER EQUIVSHeeeeeeeee 


ZISSIRBRGOSSS 
= 0 0 P— 0 0 0 b> 0 Pb 


HY BUNCH STATUS REGISTER 
*TTY BUNCH SuTPUT REGISTER 


2 


s CONSTANT Sissies ee 
oh: OTIS ARERR SAT 
DVN: ; DRIVE NUMBER 
UDES: O iNET Be RIPTION (PARITY, DENSITY, UNIT, FORMAT) 
Barn: {77 FREE lA OBS Bt ins comuerEN 
TMEX: 0 ; TAPE MARK FLAG: 1=TM_O=NO TM 
Mes 8 itt ees Dane = 
a | ran 
: ; 
verAt: bo00 iy STAL _ 
Pou: 7777s Pee STATUS 
PSi: 1 ; S TAT 
SWR: 17757 °C Sit 
Tis: 177560 ‘TTY READ STATUS REGISTER 
PRS: *H/S READER BirreR REGISTER 
PRB: *H/S READE F 

RANBAS: 153624 RANDOM NUMBER GENERATOR BASE 

paver poet iRenoen OUR SAE er 

FCSAV: * PRONE CSUN sive 


ert esate fi] 
Coen 
WLWl-O . 


FRESH SRE TE MO PM este Gee 


pe ee 
: | 





K 
Ty MACYLL 27(732) L1-MAR-76 14:46 PAGE 6 
Tope/TULe DATA RELIABILITY PROGRAIN 11 27(732 


;FLAGS AND COUNTERS##teeeeeee 


Er 


: : PT RETURN STORAGE 
cI AL: iD Y STORAGE 
MTCL: fag REGISTER BUFFER 
UNE: a te TABLE POINTER 
RPCNT: ass COUNTER 
ARE: ATA 
SER: : TA ERROR FLAG 

$ ; 
Speen 5 SUNIT PO 
BOPP: : ie P OPPED Bon 
BPKP: ICKED POINT 
BTFLG: TAPE 
EPI ig c PRINT FLAG 
RTFL: POSE FLAG . 
ReEOF; AUTO SEQ FLAG 
ADRVN: : sUTO @ DRIVE NUMBER 
ABLCNT: © BLOCK COUNTER 
ASEQCF: : ;AUTO SEQ CONTINUOUS FLAG 

3E 


é 


4 Pela RELIABILITY PROGRAM “MACYLL 27(732) 11-MAR-76 14:46 PRGE 7 SEQ 0037 


;UNIT ORDER AND DESCRIPTION TABLE ##exeaneee 





UNI: sTHIS T Is 
UNS: sWITH UN NUMBERS: BRO 
UN3: ; THEIR IPTIONS IN 
UN4: : THE THAT 
rhe sWILL TESTED 
UN?: 
4 UN8: 
UNX: -l 
s;UNIT DROPS AND PICKS POINTERS##eeexee# 
001210 PIKi: BP0O0 
ooisep PIks: pat 
1 PIK3:  6P 
1 15 Pike; | BPdD 
1 raked PIKE; BPS: 
001004 O01 pike? 
Bt 001 PIKB8: i 
sot 00141 DRP1: 
Bat le 001430 DRPe: 8010 
1014 001450 ORFs: 8020 
00101 rttt DRPY: 8030 
001 ite DRPS: BD4O 
001 1530 DRP6: 8D50 
001024 ithe DRP7: B8D60 
001026 0015 DRPS: #80970 
;UNIT BAD TAPE POINTERS#####244%% 
001030 001610 BTADDR: BTOO 
001032 001714 BTOl 
001034 002020 BT02 
001036 002124 BTO3 
carted 002230 BTO4 
et 002334 Bie 
1044 02440 TO6 
001046 002544 BT07 
;UNIT WRITE RETRY COUNTER##k#x##e¢% =, aw 
ies) spe mu 
001054 aaa RTY3: < 
obiceg Bpp000 RTYS: 5 
001 000000 RTY6&: OQ 
001064% 000000 RTY7: OQ 
001066 000000 RTY8: O 


;UNIT WRITE ERRORS##HRREERER 


POSSE SRR URE RSE IER EERE Bd sano oe CET ee ROM UNE eS : 


é 


Sin ees : 


WWW WWIWWWIW) 


TT SSL RA toG SAS CRR TERR ee VO TONS 


oR eae RELIABILITY PROGRAM 





- = 
8888 


pos bet be Ps peg Ra He 


bt $$ 44+ 44 
FERIS ENS 








FESSRLRS 


Ben pee Bm he Pt RS he pe 
b— po p= 2 bo pe pe pe 


88888888 





ee 
en ee ee ee 


88888888 
FERSFLUS - 





88888888 
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; 


ba = 
O0000000 


= 


UNIT READ FORWARD ERRORS###eeeeREE 


~ sUNIT DATA ERRORS FORWARD##s###e8## 


RDERR1: 


DEREV1: 


Oooo000o =: 


Oo000000 


;UNIT READ REVERSE ERRORS##22e2e42% 


or : 


UNIT DATA ERRORS REVERSE xx#2exexEx 


¥ 
SEQ 0039 


NO3. 
LI-MAR-76 14:46 PAGE 9 


. c ‘ “u 1 y ' 
“ 
©" "0 "lo to foo to fata to tig" tao" 


;DROPS + PICKS PER CHANNEL PER UN] Texxeeeeeee 


Ha. 


MACY11 27(732) 





a : 


a & & & 
S8Sseaeaa : : 3 + 888 


SRR ASSN ENSS ERAN 


Apes Tule DATA RELIABILITY PROGRAM 
1210 
1230 
1250 
1270 
1310 
1330 
1380 
1370 
1510 


TMO2/TUL6 DATA RELIASILITY PROGRAM MACYLL 27(732) -MAR-7 : 
Oc Tar Pit 11 27(732) Li-MAR-76 14:46 PAGE 10 


;UNIT BAD TAPE COUNTER: 16 PER SLAvEssseaeesae 


0 
=.+102 
.*102 
.*102 
+102 
+102 
+102 
+102 
-2.4102 
;UNIT END OF TAPE COUNTERS 1 PER SLAVEsseeeee 


;UNIT READ FORWARD SOFT ERROR####e## 
0 
0 
Q 
0 


sUNIT READ REVERSE SOFT ERROR###e#2% 


: 
: 





/TUL6 DATA RELIABILITY PROGRAM MACY11 27(732) LI-MAR-76 14:46 PAGE 11 
peToe Pit 


SUNIT READ FORWARD HARD ERROR#HHEHE# 
UNIT READ REVERSE HARD ERROR####+## 
0 


;DATA PATTERN GENERATORS tii eet te 


. sENTRY TABLE 
DATO Te INPUT FROM H/S READER(SEE MAINDEC-11-DZTUF) 


13 sALL 


A Sea Hat ART pod ae BEES 


cS 


2 


=—44 
WIC) 


33353445544 
44 


SPREORLS 


ERZESS 


FEE Reon 2 
SPSSHSHSSHHoyooSS 
BSSSSeeo 


: 
, 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


=3355454 
DDDWDDPMVHUDYM 


: ALTERNATING CHARACTERS 0 
; WALKING O/ALL IN AL 
PAUTO SEQUENCE PATTERN 0.0. - 


Be oan om oj 
P| ™“ 
£ 





TA TY Y ) -MAR- y: 
a le RELIABILITY PROGRAM MACY11 27(732) 11-MAR-76 14:46 PAGE 12 


48S 


- EVEN 
548 S698 3 8 4 A 
; PROGRAM START AND SEQUENCE FORMATTER: 


: | ete ena a 1 da 
a ea dbar E THe Nex Text =phyt Js, SELECTED 
i WRITE STATS MAY BE PRINTED. AT_THE END OF 


AC SWITCH FOUR 
SSsSSUAEDAALESSSGUAEAEESTSOEASSGSSEAESSTESSSESSSSDEEEES 


SE8h 


CLR ASE QF ;CLEAR AUTO SEQUENCE FLAG 
sSET TTY ENTRY F 

CLEAR RANDOM DATA FLAG 
;CLEAR TTY INPUT FLAG 


;CLEAR TTY ENTRY FLAG 


Lo] 
<z 


: 
433 
: 
3 
; 


;CLEAR FLAGS AND COUNTERS 


;SET STACK POINTER 
;GO0 RESET RANDOM BASE 


ay 
3 


ODONTOL wre 
statet 
Sane 


bo bs Bs Be be be Bb bh a Bo & Be eo 


UNUNUNUNUIUUn 


> 2b ahh bP - pap 


;CLEAR STATISTIC COUNTERS 


;PRESET PATTERN 
;PRESET BLOCK COUNTER 


2 
>) 


DE SRER ERE 
Sanees 


;SAVE VECTORS 


;SET UP FOR TIMEOUT 
sREFERENCE HARDWARE SWITCH REGISTER 


Sr 


;ADJUST_ STACK A, 
POINT TO SOFTWARE SWITCH REG 
sRESTORE VECTORS 


31S SWREG SELECTED 


aqunquaeass: 


= 
3 
< 


£ 
Bees 
oreo 
g 


a 


SOROS see OR ees 


uy 
é 
a 


BE 
a 





srpeTUpe bata RELIABILITY PROGRAM 


175226 


175240 
175156 


175320 





PALO CSE IRR OR Baa oul sonn ow Ohn ORE COMMAS Ose aaR LORS 
si Lanaeae2 se CRE TEER BEE U OSS 


E04 
MACYLL 27(732) LI-NAR-76 14:46 PAGE 13 


4$: 
STAROR: 


STAROB: 


START1: 
STARIA: 


STARIB: 


STARIC: 


START2: 
STARTS: 


STARTY: 


747S2 STARYO: 


CLR pores 


,CNTLU 
Rolie 
Kem ORICROD 
iy 
E i , UN1(RO) 
4 r (RO) 
mov. REOTCLRS 
ath RS REOTC 
MOV #100, STKs 
Rup 
Gon UNI CRB) 
MOV 1(RO),UDES 
IMP TARTS 
co 
Be Bett auc 
BNE STARIC 
OM 3 ) 

NT 
cf Oe 
COM UNL (RO) 
SOY CONIC RO), UDES 
ee 
JER CCNTR 
By Hide 3 
SR PC, DATR 
BIT a ISR 
BEQ 5 ty 
J 
BIT a , UNL (RO) 
Q 5 
IMP TART 
MOV VN 
MOV UDES, ace 
et 
Bee BT ahry 
J PC.P 


" 
“+ 


APRT : 
#MSG49, RY 
OUTT ;PRINT NOT AVAIL 


SEQ 0043 


TTY ENABLE 
;RO = UNIT TABLE POINTER 


;IF LAST UNIT IN STRING: BR 
;LOAD NEXT UNIT DESCRIPTION 


‘Eee puto sea 
ieee Tr oor SEO 
rea tt 


fa oT 


NTT TABLE TERMINATOR 
Srey SE 


UNIT DESCRIPTION 
RECORD SIZE 


RANDOM RECORD SIZE 
CATA 


Te TUS DATA RELIABILITY PROGRAM 
bet ll 


Ob bb oh ee 


PCOMOrrad 


CERESESERSESTY § 


NOW £UITuEH 





: war : alt 
000-000-000 O00 - O- OO 


aa 
z 


Ce Er DORE RE ERE 





‘etal ata 

22 BEgesseeseas 

EA RRR RR ORRER ER 3 
NNN NNNNNN 

—- ~ 

| - 


Soy 


— 
o 


eae 
RES 


4 


mee ee 





am EE 


MACY11 27(732) 


STOPP 


338 
a3 


FOY 
11-MAR-76 14:46 PAGE 14 


Pe if Bp UP we. DATA 

feta AL ET hen AROUND DELAY 

Filet ore. 
ie 


#40000, dsH IF ‘SHOULD PRINT STATISTICS 
al, : RECORD C R101 
‘STP iPagt Gre 
Be niet DROPS AND PICKS 
tre "RETRY TOTAL 
ee: ;PRINT RETRIES 
;PRINT WRITE ERROR TAG 
WYERI CRA) JR 
;PRINT WRITE ERRORS 
sip ;PRINT READ FORWARD ERROR TAG © 
we ret ;PRINT READ FORWARD ERRORS 
7 ;PRINT SOFT TAG 
RPSOFTCRY) RS 
wnat ;PRINT FORWARD SOFT ERRORS 
aa a ;PRINT HARD TAG 
shea = ;PRINT HARD FORWARE ERRORS 
;PRINT DATA ERROR FORWARD TAG 
BATERI (RY) ,R3 
sau ;PRINT DATA ERROR FORWARD NUMBER 
;PRINT READ ERROR REVERSE TAG 
ROERRI CRY) ,R3 
sahil ws ;PRINT REVESE ERROR NUMBER 


PRINT SOFT TAG 
UNP, R4 
RRSOFT(R4) ,R3 


SEQ 0044 


| | GO4 
TwOe/Tuyb DATA RELIABILITY PROGRAM ACYL 27(732) LI-MAR-76 14:Mo PAGE 15 


oe 
~_ 
oO 
: 





mee eo 


6 174336 17426 
B7be 174332 174254 


22 re 


TASES MONE PRMMM AE TAS a RTA 


— eee 


174426 START?: 
eT ARTS: 


OcTPP ne zs SPRINT REVERSE SOFT ERROR 
reouTT ‘ ;PRINT HARD TAG 


TTOUTT ‘ sPRINT DATA ERROR REVERSE TAG 


-OCTPP : ;PRINT DATA REVERSE ERROR NUMBER 


atstr ISET a AT ONLY PRINT 


. JSR . etn SOT EAR pre TAPE STATS 


RO 3L 


ie HAVE RERO OR RT 


cer UNIT READY 
: BR 


ee Elie SPRINT HEROER™ 


‘MOV 
TTOUTT ;PRINT NOT AVAIL 


; SPOINT TH NEXT UNIT 
ine START sBOUNT ip NEXT un 
;RANDOM BASE RESE Tssitiiiititiie 

MOV @ 24, RANBAS 

nov as2ee1 te et 6 t RECORD COUNT 


ECSAV, »FMCNT sRESET FRAME COUNT 
RTS 


/TUJ6 DATA RELIABILITY PROGRAN 
peter Pa 


691 


BURRESS Se SR LOR 


NNN SINNNNSNG 
Pe hn be Be ee 
WO NDU1L WIT 


FIBA AIAN ATTAINS 


ho ten nn ee enone 


a 


re 


2g 


pha po 


Rite. 
M 


: 


174320 


174030 


174142 


MACY11 27(732) 


REOTIA: 


REOTIB: 


REOTIF: 


REOTIC: 
REOTID: 


REOTIE: 


REOTe: 


REOT2A: 


HO4 
LI-MAR-76 14:46 PAGE 16 


3 JU HSHHIHHHHHIEHIHHHIHHIHHHHIIHHHHI HHH HHH 
a FROM EOT: 


atts TESTED REACHES END OF T 


Pit a 


3AT 
sPRT 


maseiss & 


Be 


Sea Races 


An O44 


UDES are 


UNP, RY 

EOTCOCRY) 

EOTCO(RY) ,R3 

8MSG16A, RY 

BTFLG 

B” BTPRT 
aDS 

REOTeA 

ST 

REOT2 

#SG&, EMADDR 


rey 


REOTC 
REOT3 


UNP RO 
OCHO, UN1 (RO) 


tape 






» IT WI MILE BE REWOURO 


REACHES 


TtAgce UNTIL 
AT WHICH rite sie WILL & WILL BE RESUMED 
OF (1), 
SUPERVISORS 


TS REROUND. 
SSeaeseeaseussasees;0000000000000000ECELEEEERELERELEREEH 


;LOAD COMMAND REGISTER 
;DRIVE CLEAR 


TART DRY 
TART REWI 
IF BAD 

SO: GR 
SET RECORD NUMBER OF EOT 
BR NT eer 

IF POSITION ERROR 
iE, NBOSITION ERROR MSG 

IF BAD TAPE OVERFLOW 

T: BR 


ie, BAD TAPE OVERFLOW MSG 
SPRINT REWIND REASON 


;SET EOT MSG 
;PRINT MSG 


APE OVERFLOW REWIND 


;BUMP CNTR 

;PRINT EOT CNTR 
sERINT RESTART MSG 
:C oe ad TAPE FLAG 
*PRINT STA 

PRINT BAD "Fore STATS . 
;IF ORY: BR 

;WAIT ORY 

;PRINT HEADER 

;PRINT NO DRIVE READY 


;SEE_IF LAST UNIT TO REACH EOT 
SIF SO: BR 


;SET EOT FLAG 
;RESET STACK POINTER 


SEQ CO4G 


Tne Tule DATA RELIABILITY PROGRAM MACYL1 27(732) L1-MAR-76 14:46 PAGE 17 SEQ 0047 





TUAF . 
747 67 aati inp START? GO TO NEXT UNIT 
a : + Rov RESTE, RO 
SWAB oT Se 

751 110067 iors HOVE RO, REOTC RESTORE EOT UNIT COUNTER 
$8 bie 760 aie RO ;POINT TO FIRST UNIT 
754 16067 173742 REOT4: MOV UN1 (RO), UDES ;LOAD UNIT DESCRIPTION 
ret GREP Blerre Aatctb LAGh ors: BH ja catgeaoei: 
: 001374 watts oe BNE ep y CURT PIE RESET 
538 Souese nates — ate Oe FEE oe oR 
760 004636 012700 000001 MOV #1,R0 
rh ese Slane Bueel fa) Gracie FPRINT VERDE 
rb : TOUT : ;PRINT BOT ERROR 
765 S& O16 17401 MOV UNP, RO 
766 oe 00076 REOTE: BIC #100090 ,UNI(RO) ;CLEAR EOT FLAG 
768 7% O16 1 MOV UNP. RO sPOINT TO NEXT UNIT 
rh Gree Big Or er Sar germ 
771 71 160 000746 COM UN1 (RO) 
772 004714 000167 177662- JMP REOTY DO NEXT UNIT 
773 og074 REOT?: CoH UN} (RO) 
774 i LR sCLEAR UNIT POINTER 
775 7 7? 173700 TINF “CLEAR TTY INPUT FLAG 
ore Dourag Boldbe fo BO OREOIX sSEE IF AUTO SEQ 
a irs ae ee aes 

746 004767 177300 REOTX: JSR PC, RANSET GO RESET RANDOM 
781 OO47S2 012767 177777 007314 MOV #-1, PATS ;PRESET PATTERN 
782 004760 7 010110 CLR ROFL *CLEAR RANDOM F 
rey poweo peided fee Bro REOTY Firs eee Pes 
785 004772 react 026702 MOV #"SG100, R4 
78 004776 199000 Trourt ;PRINT END OF PASS 
788 bos00e ee) 173736  REOTXX: INC EOPB1 
789 000167 176130 MP STARTE ;RESTART AT BLOCK NUMBER ONE. 
790 005012 o00000 - ReoTe: 0 EOT UNIT COUNTER 


é 


45 Palas RELIABILITY PROGRAM MACY11 27(732) L1-MAR-76 14:46 PAGE 18 = SEQ 0048 
Pr itiiiiiittttrtiitiiiittettiiiititetiiititttiei a 

sREMIND ALL AVAIL TAPES: 

;THIS ROUTINE; ENTERED VIA CONSOLE SWITCH NINE (9), 


eh al otto Rad arn 


30N THE CURREN 
SUUELATASESEESEESADESESESGAS 0 EEAASEEEEAEEESERAESEEEEEAE 


Pe : 


005014 032777 OO01000 173564 RWND: BIT #1000, 2SWR IF SHOULD REWIND 
b1 0080ee 001001 BNE RUNOA Feed $0: BR 
bostee 1 2 173642 173660 RWNDA: HOV UNE , UPS iSrve Oh a 
7 1 st LR c ‘CLEAR EDT FLAG 
She haat bose? 173i erie ote : 
807 005050 016700 177736 MOV REOTC, RO 
BS Oosoeg are 1106 a4 ora aoe a + Re REOTC RESTORE EOT UNIT COUNTER 
810 4 016700 173604 RWNDO: MOV UNP, RO NT TO UNIT ENTRY 
gil 005070 0051 hoasue COM itRO) rg T ENTRY 
lg 005074 O01 BEQ RUNDE 
81 005076 000746 COM UN1 (RO) 
He 00510 ; 100000 000746 BIT #100000, UN (RO) SEE IF ALREADY REWINDING 
816 ppetie need 000748 173432 MOV Nit ) UDES SET UNIT DESCRIPTION 
817 005120 016777 173426 173414 MOV UDES, aCe LOAD COMMAND REGISTER 
gig O051¢6 ler 000011 173354 MOV #11, acl *DRIVE CLEAR 
19 0051 1 000007 173346 MOV #7, acl *START REWIND 
820 nats 036777 000200 173352 RWNDI: BIT 4 130s ai oedt on 
Bee phe Wiese 173510 Bee STAL g ‘ 
BOEIER DIhee Oou7u? 173464 Sy grece.eneoor = MRET ORY 
B5¢ Boe 14 pees 15470 JSR —s PC, Beet SPRINT HEADER 
826 005172 012704 22 MOV #5670, R4 
ee 1 Iie Trourt PRINT NO DRIVE READY 
bu 100000 000746 RWNDIA: BIC #100000,UN1(RO) ;CLEAR EOT FLAG 
830 005210 062767 000002 173456 ADD #2, UNP ‘BUMP POINTER 
831 005216 000167 177642 IMP RWADO DO NEXT UNIT 
832 005222 005160 000746 RWND2: COM UN1 (RO) 
833 173442 LR UNP ;CLEAR POINTER 
16700 173436 RWND3: MOV UNP RO sEOINT. 10 UNTT ENTRY 
Bpesae pordas CCOzHe OORWKO TE she bee 
Be EES) EI? UIE ery YHA es sey tr escape 
B3e Boeser, pipes poze 1oacc! i" S$ ace + PB AD Manner REGTETER 
840 005264 020000 173230 RWNDY: BIT #20000, 30S 
841 005272 001374 BNE RWNDY UBT PIP RESET 
ete gose74 ooo002 173220 BIT #2 aps E IF HAVE 
1410 BEQ RIAD NOT: BR 
844 005304 pO0002 173362 RWNDS: ADD #2, UNP i tr TER 
Bis 005312 16777 000011 173170 MOV #11 acl ; DRIVE LEAR 
005. 167 177706 IMP RWND :DO NEXT UNIT 









847 





SOOO oe sas 


012700 


pole? 77734 


Te TUS DATA RELIABILITY PROGRAM 
DZTUAF . ll 


000001 


173156 
1731S2 173140 


MACY11 27(732) 


RWND6: 


RWNDX : 





MOV 
J 

V 
TTOUTT 
STOPP 
. 
HOV 
MOV 
MOV 


MOV 
RTS 
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Be Bo 
agua RY 


;PRINT HEADER 

;PRINT NO BOT 

;D0 NEXT UNIT 

;RESTORE UNIT POINTER 
;RESET UNIT DESCRIPTION 
;RETURN TO TEST 


pee rupe bata RELIABILITY PROGRAM MACY11 27(732) L1-MAR-76 14:46 PAGE 20 SEQ 0050 


| EHHEHHEHHBEHEHHHHH HEHEHE IHEHHHHHHHHHEHHHHHHEH 
jWRITE ROUTINE: 


Tuts pour NE TS USED TO TO WRITE ONTO 12 TOPE THE BLOCK 
Dy BERTH scl hath loa vet 
ALS eRearie lies Se Tri! BHT DE GR RHEL ch Ths CHECKED 
a Ta FO MD ant eer N Resucrs {0 
fay Be E DONE BY Se tN ee ch (4) 10 wf, O86 (1D. 
talk cia Reto ee 


MADE mien ; RAR THE. T™ ns COUNTED as Fora 
: CORDS PLUS IE RECORDS; TARSRECORD 101) 


j1F THE WR Sia ite Cc THE SELEC D SLAVE 
bee 2 a Porte TE TiN ve ea) : FELON AND when. 
sRERC E3r ofttd BEE LOWND ar WHICH time test Ne IS 

RITE R Laat. SLAVE 

-ERR 


ITE RETRY MAY BE ALLOWED via ¢ SWITCH FOUR (4). 


PS ae Rene Rn ert it Site RR PRRRR IS rete tat ae 


ERRO R CHECKING MAY BE DISALL VIA CONSOLE SWITCH 
pit ING TO TAPE MAY BE DISALLOWED VIA CONSOLE SWITCH 
Fre trttititiitti tii ittittttitiitiititttttii titre t 
005067 173250 WRITE: CLR EOTREC sCLEAR_EQT FLAG 
032 000001 173170 BIT a >SEE IF SHOULD WRITE 
BpeHTe 001402 BEQ fae 
005420 000167 ooosse IMP WEX IF NOT: BR 
005424 015700 173124 WRTE: MOV RCNT, RO : RO=RE CORD COUNT 
005430 012767 Oe4742 173214 WO: MOV #MSGS,EMADDR SET E MSG ADDRESS 
005436 016777 173114 MOV FMCNT. oFC *LOAD CHAR COUNT 
005444 012777 027454 173042 MOV #WDATA, aBA SET DATA ADDR 
bostee 112767 173212 nove #60, MTC1 ser OP COMMAND 
12767 472 173174 V #1’ RTRN SET RE ADDRESS 
OOSYE5 000167 013502 PRES, HP t my 5G0_ EXECUTE COMMAND 
a 1405 omane: BS . iT nor F? EOT: BR 
005502 010067 173152 MOV RO, EOTREC :SAVE EOT RECORD 
005506 O5e767 100000 173144 BIS #100000, EOTREC ;SET EOT FLAG 
g0s514 O32 010000 173064 we BIT , aSWR iSEE IF SHOULD CHECK ERRORS 
910 005524 Spa eF 011624 ISR ERCHK *GO CHECK ERRORS 
911 605530 016767 473040 173130 W3: MOV WSTAL, STAL ;SET DELAY 
zig 005' 004767 004420 JSR PC, STALL ELAY 
913 005542 005767 173144 TST RTYFL ee, IF RETRY TIME 
914 005546 001401 BEQ W3A F NOT: BR 
91S 005550 000207 RTS PC SE RETURN 


/ DATA RELIABILITY PROGRAM 
ren TU , I 


SERERRERRP PARRA RO RRRG SIE S EC ES eso RER eR ERE AE eROROR ERE 


wo 


wononwo 
a 


0c™o 


N 
as 


~ 


a 


— 
~ 
T 


Roo ece ener 


006072 


005767 


Bie768 
00S264 


— 


8 
i 


i we ee 


173130 
173110 
001 


obie0 


002000 


173004 


172732 


172506 


MACY11 27(732) 


W3A: 


11-MAR-76 14:46 PAGE 21 


WTERI (RY) 
ws ’ 
ERSAV,R3 
#1 RB 
Be PAPRT 
#578, R4 
PC, NRTP 


UNP, R4 
WTERI (RY) 
#20, ISWR 


;SEE IF WRITE ERROR 


‘IF NOT: BR < 


Pa Rn nae 


IF Nor: 
;MASK UNRECOVERABLE ERROR 


Pent HEAOER 
IPRINT ER FOR NON-RETRYAGLE 


1 TP or 
SPF Nor: BR 


;PRINT ORIGINAL ERROR TAG 
NUMBER 


;SEE IF SHOULD CHECK ERRORS 
;SEE_ IF ™ STATUS 
;1F SO: BR 


‘PRINT TM ERROR 


;SET EXPT ADDRESS 
G0 CHECK FOR OTHER ERRORS 
; SEE IF RETRY 


IF BR 

ielgt RETURN TO_RETRY ROUTINE 
;SEE IF WRITE ERROR 

;IF NOT: BR 


;BUMP WRITE ERROR 
;SEE IF SHOULD RETRY 


SEQ 0051 


oO .£n 


TMO2/TUL6 
OZTUAF .P11 
972 00100 
73 1 
1 
ll 
are pelt 
1 
980 1 
. 981 006134 
Fa 006140 
006144 
984 006150 
985 vate 
986 162 
987 006164 
988 006170 
989 00617e 
990 006176 
g 
934 
96 
997 
- 998 


~ 


pieces 


001436 


DATA RELIABILITY PROGRAM 


172424 
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‘ 


WTM4: 


WTM4A: 
WEX: 


WRW: 
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;IF NOT: BR 

;MASK UNRECOVERABLE ERROR 
;IF SO: BR 

;PRINT HEADER 


sPRINT UNRETRYABLE. TAG 
SPRINT ER FOR NON-RETRYABLE 


;CLEAR REPEAT CNTR 

BUMP RETRY CNTR 

ca RETRY CNTR 
IF PRINT 


SPRINT ORIGINAL ERROR TAG 
DO RETRY 


CLEAR RETRY FLAG: - 
CLEAR TAPE MARK FL AG 
: IF EOT 

F .SO: BR 
sELSE EXIT 


;SEE IF WRITE ONLY 
:IF NOT: BR 
ELS REWIND 


SEQ 00S2 









t 


0b <p 


esr iStoiF rei 






0-0 20-6 > p> 2-0-6 ~- 9-6 





ONoO0O0000 
OO NOU £ ITU 





0 0-2 0-2 B= 0 0 = 6 +b +b -< OO + & = + BO & = 0 -= Bb = & = B+ > B= OD = & = 0 bm 0 Ob -2 D 2H 2 pop 


PRPRNMAES LSAT SOLS CRAMP ae VOOR 











ee 


-_ 
=A 

-_ 

- NNEN 


S225 
ceses 


=) 
- 


pir ts 
on 


Stat 
—-O- 
owo 
NWN 
ZF 


ai, A DATA RELIABILITY PROGRAM 


172364 
172262 


172236 
172166 
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SRRPRRRSEPSSEERSEEREER EEE 
ITE ERROR RETRY 


: LRLLALALSHSRLHRLLSSLES EES 


ay 


TY. oy 
: 
ei 

uarvin: ek 


0c 
WRTY1: RTS 
WRTYe: MOV 


ven: Bi 


WRTY2B: MOV 


WRTY3: TS 
"BNE 
¢ 

WRTY3A: MOV 





Oe 
8 , OSWR 
#MSG110,R4 
sMSGES, RY 
RTCNT,R3 


#MSG111,R4 
RPCNT ,R3 


;PRINT RECOVERED MESSAGE 
;PRINT RETRY TAG 


;PRINT RETRY NUMBER 
er STING 
pe Ma et Ls anit 


at ieee 
iPRINT ER NON-RECOVERABLE MSG 
fc 


; 
TF NOT: BR 

;PRINT BAD TAPE SUSPECT 
;PRINT RETRY TAG 

;PRINT RETRY NUMSER 
;PRINT REPEAT TAG 


;PRINT REPEAT NUMBER 
ieee IF IF Of ANONSRECOVERABLE 


‘ar Thi 
“SEE IF FIRST RETRY 


IE Nor: 


sDECREMENT WRITE ERROR CNTR ~ 
:GET UNIT NUMBER 





/TUL6 DATA RELIABILITY PROGRAM 
ooraee BP 


10S7 


=< 


006516 


0 b= 0 p= 8 p02 bp po Be Be 
RA ae ae ab a 
xz ; 
—P— Fo 
Saves: 
—e 
~“™ SELES 


8 

OO 

r x 
NNNE£O 


~- 
o 


172014 
171766 
171624 
171614 


LL. 
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BTADOR(R4Y),BTPT ;GET ADDRESS OF UNIT BAD TAPE CNTR 


jer SET SOUNTER orrser 
aBTP 


TPT. R ; 
i ABSOLUTE POINTER 


3 

BLENTR, (RY) BLOCK NUMBER 

HEbameEY RECORD MinaeR 
sSEE IF TOO MANY BAD SPOTS 
tELSE GC 5 TAPE OVERFLOW 
see TF DONE SRE TRIES 

FF sd: Bre 


;BUMP RETRY COUNTER 


iS eee fe 


;ELSE GO TO BAD TAPE UNRECOVERABLE 
;WRITE RETRY BACKSPACE-ERASE SUBROUTINE s#eeeeenes 
;CLEAR FLAG 


Ser won CODE pee 


T TO BACKSPACE 1 RECORD 


EE pe baatietesesnita 
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? rams BTOV: R RTYEL 2 s CLEAR RETRY FLAG ae | 
: shove IMP adof Bf REATNO AAO REMOVE FROM TESTING 
6701 BTOVO: : BTPT Rl ;SET TABLE POINTER 
1 BTOV1: nov R03 ; 
saree Hees a 


‘AREY EAR Sasa "ee 
fon SKIP CR 
ate :BRINT Back NUMBER TAG 


(R1),R3 
; ;PRINT BLOCK NUMBER 


#MSG14,R4 
;PRINT RECORD R_TAG 
#40, Ri ;SET POINTER OFFSET FOR RECOED NUMBER 


(R13+,R3 7 
;PRINT REC NUMBER 
sRESET POIN FOR BLOCK NUMBER 


isd: BR 


BR Tov” OO AT TNE 
TOV2: : hi TAT ONLY PRINT 
, BNE BT ieee : BR 
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BTPRT: 


BTPRT1: 


BTUR: 












3;BAD TAPE STATISTIC PRINT#Hexenee 


#/SG28,R4 
TTOUTT * ate 300 CR/LF 
MOV BTADOR(RY) ,BTPT SET TABLE POINTER 

TPT,R3 

be R3 6 CT NUMBER 
OCTPP INT NUMBER OF BAD SPOTS 
MOV #SG112,R4 
TrouTT a BRD T 
TS TPT epers 
BNE Tl 
RTS PC 
IMP BTOVO ae erine 
;BAD TAPE UNRECOVERABLE SUBROUTINE s#eexeee## 
ISR PC, PAPRT ;PRINT HEADER 


7, 
PouTT SrGLO? 8 ;PRINT UNRECOVERABLE BAD SPOT MSG 
RESUME TESTING 
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TUAF . 

i { En SERERIa ate cece eee 
i SEQUENCER: 

1178 Bs igh ees THE 

te: sete 
1189 

1181 

i fee cTION 4 han gate ni RoE 
Liss T bit DATA on VERGE ae 
tide he etoek (2) DISALLOWS READ NG nT 

1187 SPIRE ETION 8 CH THREE (3) ca Te fe BEE IN 
ll 

tise Prrtiiiitiriitiiititiitiitititiiiititittrtrititiites 
1191 ores i ? ae 171266 RSEQ: MOV #2, ROCHD 

11 1 1 sRERD ITC 

11% 1 BIC #177763, R4 Rak READ HRs 

1194 007304 TST RY BOTH READS . 

Lise BOPaI Bm BR 

11% 1 ooo0g2 171270 I aSWR Pe REVERSE FIRST 
Hee ES BB? coco mH Ee 

1198 O00004 171260 RSR: I #4, JSWR ue SHOULD READ REVERSE 
1199 007326 901905 BNE RSF iia 

1200 007330 012767 010000 171224 MOV #10000, ROCMD 

1502 ovaus ba2797 SODOID ‘eC 

ete ; 10 171236 RSF: BIT #10, SHR 

1204 popsee Wee Sd 010000 171202 BI #10000, ROCMD ‘ati HAVE READ sce 
is eed 71210 171276 oa Fern STAL sIF NOT: 

ists 767 hrsere JSR PC CTALL D0 READ STALL 

HE Giri Geter SRR rie wore PY Heim sae agi 

1210 007406 100 RSF 1 *IF NOT: 

tell 007410 76 JSR PC, BKSP GO BACKSPACE 

lele bord 12767 171140 RSFl: ‘MOV #2, ROCHD ;LOAD_READ FORWARD COMMAND 
121 22 767 O00166 JSR PC’ READ READ 

1214 007426 005767 171226 TST EOTREC SEE IF AT END OF TAPE 

121S O07432 1 ePL RSEX :IF NOT: BR 

1216 007434 O00167 174644 J REOT “ELSE GO TO REWIND 

1217 007440 171214 RSEX: CLR EOTREC :¢ EOT FLAG 

1518 Bore BISvE? Ol 171106 SFR: foy  eiooo0,rocm 

1e26 007454 erat 171124 BIT #10 ash i SEE IF cm READ FORWARD 
ot oe a ee 

Lees Garand Goto? onz2ny ih Fea c-IG, STR 

1 12767 171054 RSFRO: MOV #2’ RDCMD oe COMMAND 
1226 SOTeoe 004767 000102 JSR PC’ READ itp READ FORWARD 

1227 000004 171066 RSFRI: BIT 4° ISWR E IF SHOULD READ REVERSE 
1228 1347 BNE SEX IF NOT: BR 

1229 007522 032767 010000 171032 BIT #10000, ROCMD 

1230. 007530 o01005 ) BNE RSFRe | ;IF READ REVERSE: BR 
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007532 016767 
Heres 


aan 
Bosse? 


000167 . 





171040 171126 MOV 


171010 RSFR: hoy 
171076 i 
170764 171086 Su 
171 ON 
174476 JMP 
171046 RSFRX: CLR 


TSTAL th 
OTREC 
RX 
NT EOTREC 
BOTREC 
REOT 


ga nee 
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;00 READ STALL 


iGO READ REVERSE 


: 

“SEE IF AT END OF TAPE 

FF Wor: BR 

;SET TO PROPER RECORD NUMBER 
SEL TO REWIND 

HELERR oT FLAG 
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1244 s SESECSER SER SNARSRNNNORRERRRR NNER Ann NER eeEeNasenseNS 
ise AD ROUTINE: 

: gy THE READ, PERFORMS THE READ OPERATION DETERMINED 

| HTS Be Bericht ee Wien 
1 EITHER OF TAPE OR BEGINN APE. 


ie rae gett Lk Be Pass, 
iT Bot W mu ee 


; THE SWITCH. 


a 
= 


IF A CTED (TM=1) THEN THE 

Re ROU Tg The IRST RECORD OF A 

iRE 0 TM, AND LAST RECORD 

; TO BEA TM. 

THAT THE TM ao0s ae: (1) TO THE TOTAL NUMBER 

°C ITCHES (11) AND THIR ( TERMINE WHE THER 
:OR NO Le FOR STAT pay pn (13), 


ea al ad 


: 


O16 170734 READ: 


bb po b> f° f+ 9 B= P -> P= Ho & + hb - B— Fm & = bP Fs fp 


270 007614 MOV RCNT ; 980 REC CNTR 
i573 poresy ogors | Oe I a STF NOT: BR 

1273 O07bes 032 ; 010000 170726 BIT ~ -10000,RDCMD  ;SEE IF ft fem FORWARD 

155e 007636 Bae7e 100000 171014 are at OTREC ie AR FLAG 

! 007644 016703 171010 HOV EOTREC, AS ‘eet MODIFIED RECORD COUNT 
1678 bosees re INC RO’ :SET TO PROPER NUMBER OF RECORDS 
i 007654 012767 024747 170770 ROA: MOV SHSGb , EMADOR *SET ERROR MSG ADDRESS 

i561 ODreee tse7e) a chose eT ees IF READ FORWARD: BR 

He fs fr, me se iPeh 

1285 007704 005267 170766 INC TMFLG :SET TM FLAG 

Hes Gurls Stee? youn zoe soo: AN Flext are, Loge cu care 

1589 B180e8 ates 1 eee “MOV TA’ 98 +L cee NOR 

1283 007726 032767 010000 170626 BIT #10900, ROCHD iSEE wor PERO REVERSE 

1291 Bae nia 170614 MOV FMCNT,R3 : ‘ 

1545 a need 000020 170600 ge 30, UDES -SEE IF CORE DUMP 

1294 ee 001402 BEQ y :TF NOT: BR 

isa OPER BD RR 3 R= FC/2 | 

1539 STE 060377 170530 -. RDI: ADD 3, 8A ?SET REVERSE BUS ADDRESS 

1298 007764 012767 000076 170700 MOV #76, MTCL ;SET READ REVERSE 

1299 007772 O00403 BR 18 
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He ee fie fhe SO Bi gee ee 





1303 010014 170540 RO2: BIT #10000,RDCMD iSEE_IF READ REVERSE 
13h 18556 000020 170470 I aos e ? 

1306 010032 001404 BEQ ROB sAWAIT SWDN 
oo ee 

1303 Loot eaten 2 ro sSEE IF or 

Hi Sis nn 

1313 010062 MOV RO, EOTREC ’ 

1314 01 al SEOTREC ; T FL 

i313 Bidtee Big SIOQDQO.Eormec SET gor FLAG 
1316 10102 BEQ RDG IF NOT: BR 

it 10108 13h PC PRPRT ‘PRINT CYCLE NUMBER 
He Sat Bi are ore 

i355 BipiSe G3277" Aosoa0 170454 ROY: bit SHC aSHR i eEE TE SHOULD CHECK ERRORS 
ties oibise Ootiey ee rn ee 

tase ibis rate BEQ sIF NO TM EXPT: BR 

1326 010142 032777 oD0004 170352 BIT #4. a0S 

132? 01050 Obi0e4 BNE Q :JE TM RECVD: BR 

1 10152 012767 010730 MOV #RDATA,CADER © SAVE EXPT BUS ADDRESS 
1329 O10160 012767 010730 MOV «#2, DRVER ‘SET TM STATUS ERROR FLAG 
1330 O10ie 004767 0 JSR —s- PC’ ERPT 260 PRINT TM ERROR 

1331 010172 016704 170476 MOV 

1332 010175 rag 010000 170356 BIT #10000, ROCND ;SEE IF READ REVERSE | 
1334 DiGe0e Og Ooseb 001150 ; ihe * RDERRICRY) ;BUMP READ REVERSE ERROR 
133 10214 ie 001110 is: INC 1L(RY) sBUMP READ FORWARD ERROR 
1338 Dltsse Gusee? proces ata OMA: ENT BT OOUG' ROCHD: IF READ REVERSE 
1340 pipese I BNE RAGAOL , : Ria BR 

1341 010236 032767 002000 170306 BI #2000,UDES . ;SEE IF IN PE 

iss alee 001025 = BNE ROAR TIF SO: BR 

4 1h5e8 pages [0000 BR Hite 

1345 O1G254 016704 170276 ROYAO: HOY —FICNT, RY 

1347 Diets 7 000020 170262 BIT 820, NDES sSEE IF CORE DUMP 

1348 10270 1ige BEQ A IF NOT: BR 

1325 BibSs4 ppesod aa sSET TO FC/2 

1351 010276 060403 _ ROMAL: ADD RMR ;SET_EXPT BUS ADDRESS. ~ 
1325 stand G3e7b7 ied 170240 ett 136 ,UDES  —«s- $SEE IF IN Be 

1354 010312 O01 BNE 4A2 ‘IF SO: BR 

1355 010314 SUB Sts«ét2, RG 
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004767 007126 ROWe: JSR PC, ERe 


1356 010320 

1322 i 007022 ROYB: FB, BOE cin G0 CHECK ERRORS 

1359 O01 ? 170350 ROWC: TST SERFL 

1360 Ol 1417 BEQ RDS IF NO ERROR: BR 

1361 O01 6704 170390 MOV UNP, R4 

: t : 7? Ol 170210 gil #10000, ROCHD SEE Ra READ REVERSE 
1364 the Soot 001110 NC oe :BUMP READ FORWARD ERROR 
13ee 1 4 001150 RDYD: INC 1(R4) : BUMP READ REVERSE ERROR 
1366 BIDSTe DOSDE? I7OSIG wel re we SPEAR RETRY FLAG 

138 Bae bepaed 170202 ROS:  8IT #20000, ISHR ‘SEE IF SHOULD DO DATA CHECK 
Het SIRS BBO ros mB ‘flaw Ne 

1 2 1 1 S TMFLG 

i373 Taye Boa 769 oosose aoe Bee DCHK GO CHECK DATA 

1 1 ? RDb LR *CLEAR STATUS ERROR FLAG 
i Bitten eter [7oees a MG Bat 

1376 010430 032777 000040 170150 BIT #40, JSWR ‘SEE IF YOZZLE 
1372 pte vined PER BR? oz teas YOZZLE 

HES ges flere det woes rs Rm 

1381: BIOeE 032767 010000 170076 BIT #i0000,ROCMD SEE iF READ REVERSE 
tee ee Goce? 170204 Beers ter eR TAPE MARK FLAG 
1384 pS BR RDIO ‘ 

1385 O10474 005767 170160 RD7A: TST EOTREC ;SEE IF EOT FOUND 

1386 g10509 3 BPL RD1 :IF NOT: 

1 1 12700 o00001 MOV #1, SET TO EOT 

1388 010506 RD1O: DEC 

1389 010510 0014 BEQ RD11 sIF DONE ALL: BR 

1390 01051 167 177174 IMP RDO 

1391 OL 1 er 10000 170036 RD11: BIT #19000 , ROCMD SEE IF READ REVERSE 
1356 Bideee Bos/e? 17012 Par EOTREC ‘See Ie EOT 

1395 010534 Meats 170024 at THEX ee IF R M EXPECTED 
13% 010540 O014i0 BEQ X 

1397 o10S42 170130 TST TMFLG :SEE rE ™ FOUND 

1398 010546 001005 BNE RDEX :IF SO: 

1399 010550 005267 170122 INC TMFLG ELSE SET FLAG 

1400 010554 INC RO :SET RECORD COUNT TO ONE 
1401 010556 000167 177130 IMP RDO GO READ T 

1402 010562 005067 170110 RDEX: CLR TMFLG 

1403 010566 ROX: RTS PC sEXIT 


eee eee oo -—- = 
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1404 ® 5 RERKRREERARAE EEL EEL ERLE EE EERE EAL EAL E EA EAE EEE ER EEE ES 
1405 j READ ERROR RETRY SUBROUTINE: 

14 :THIS SUBROUTINE WILL RETRY ALL DATA RELATED 

1408 sREAD ERRORS UP TO EIGHT (8 (8) TIMES. 

4] eet Naa a ta 

1411 :SOFT ERROR. RETRIES MAY BE I 

141 ‘VIA SWITCH FOUR (SW4=0: me te TIRES) 

uid Soe ; REAALAALLAALA LAA RL LALA LE LAAA LEAL LE LAL ARALAAA ALLA AEE 
141s 010570 ‘$3277 000020 170010 RDRTY: BIT 420, OSUR sSEE ar. RETRY INHIBITED 

141 ates Bre PC “ELSE RETURN 

1418 010602 16703 170114 RORTO: MOV — ERSAV,R3 

1419 10608 04 1 BIC #102700, R3 ; MARK NON-RECOVERABLE ERROR BITS 
ius) GIDETT GON?e> 01204 eee Po, PaPRT SPENT HEGRER 

122 Oi deed = Ot000 2 BW ae rm oan NON-RECOVERABLE MESSAGE 
lyse Bipese ppcens [22804 RoRTIA: Rie | PRT TP SPRINT ER FOR NON-RETRYABLE ERROR 
14 010634 e772 002000 167744 RORTI: BIT #2000, jSEE cit PRINT INHIBITED 
1428 O10644 012704 026315 MOV _ 4, P ; 

1429 010650 104000 a TTOUTT ;PRINT ORIGINAL ERROR TAG 
1430 010652 005067 170024 RDORT1B: CLR RTCNT CLEAR RETRY COUNTER 

1431 010656 005067 170024 RORTG: CLR SERFL ;CLEAR STATUS ERROR FLAG 
1432 010662 1276? oo0002 170022 MOV #2, RTYFL READ RETRY FLAG 

fist Glee Bievey bee a a ce le 
1435 019709 001031 BNE RORTS IF SO: BR 

1436 O1 002000 167676 BI #2000, 

1437 010710 001011 BNE RORTe 

ty steata retain 7 OUT umn PRINT RECOVERED MESSAGE 
1440 010720 012704 026337 MOV 8MSGES, RY . 

1441 010724 104000 TTOUTT sPRINT RETRY TAG 

1442 010726 016703 167750 MOV RTCNT,R3 

1443 010732 104 OCTPP :PRINT RETRY NUMBER 

1444 010734 016704 167734 RORT2: MOV UNP, RY 

144e DIOPuE DBioBg CLCOOO 167618 Biz SIDHOO,ROCMD SEE _IF READ REVERSE 

1447 bi07s0 005264 002670 Inc RESOF T(RH) *ELSO BUMP FORWARD SOFT ERROR COUNTER 
1449 {Ove 002710 RDRT3: INC RRSOFT(RY) ERRORS SOFT CNTR 

1450 Bee RORT4: RTS PC : fait 

tues Biosea pueeos | {Boman RORTS: ee eyOG TRS COVERABLE BITS 

{HES ste 141 a BEQ RAR SA TF see Be 

1454 010776 011660 JSR PC, PAPRT PRINT HEADER 

1456 011002 01 026642 - MOY #5679, R4 

1 011006 104 TTOUTT ;PRINT NON-RECOVERABLE MSG 
1457 011010 004767 o0012e2 ISR PC, NRTP sPRIN NT ER 

1458 011014 012767 O00001 167624 MOV #1’ TEMP3 SET FLAG 

1459 011022 O00404 BR RORTSB : 
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Pll 
11 777 002000 167554 RDRTSA: BIT #2009, aSWR : F PRINT INHIBITED 

Ne? BLIGE BRET gee 

Labs 11 1 026337 RORTSB: MOV #MSG6S,R4 

1 bi 1049 108 TTOUTT :PRINT RETRY TAG 

tues Oliows josoos fee Opypp CNT RS PRINT RETRY NUMBER 

1466 118e8 ead 167572 , ST TEMP3 joke IF F DID NON-RECOVERABLE 

1467 011054 001403 BEQ RORTS ‘IF NOT: BR 

1468 011056 . 167564 CLR TEMP3 CLEAR FLAG 

1469 O11 RTS tEXIT 

1470 011064 7? 167612 RORT6: INC RTCNT 

1471 011070 7? 167606 167504 CMP RTCNT, RETRY ;SEE IF DONE 8 RETRIES 

Lies ELItos tere corar my, weeds NT 

1474 sett TaKi000 TTOUTT ' ;PRINT HARD ERROR MESSAGE 

THe Otitis Gae7e? Beo00d 167442 BrY —-BION00,ROCMD  ;SEE_IF READ REVERSE 

14 Oi1136 I BNE #10600, iF Sb. BF 

1478 Oiilee doseés 002730 INC REHARD(RH) ‘BUMP FORWARD HARD ERROR CNTR 

1480 011130 eee 002750 RORT7: INC RRHARD(R4) ;BUMP REVERSE HARD ERROR CNTR 

1481 011134 000207 RORTX: RTS PC ? RETURN 

1483 011136 016703 167560 NRTP: HOV ERSAV,R3 GFT ER REGISTER 

1485 011144 004767 007764 JSR PC, FRPRT ‘PRINT F OR R 

1486 011150 000207 ; RTS PC * RETURN 


eee 2 oe 
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1487 HE HEHEHE HEHEHE SEAR HEE EEE RE HSER HER EEE EE EE EE 
{ie ;YOZZLE SUBROUTINE: 

145 37H THIS, SUBROUTINE, ENTE ENTERED aaa: SUITCH FIVE (5) 15, USED, 19, PERE 
tage Putt PNLARTOS an Bat ck checkl NB PRY BE He CURREN 

14 30R ONSOLE ul SUITCHES ELEVEN Ht bac THIRTEEN (13). 
149 370 THE PRINTED REQUEST, 

wae ® 1 HEHEHE HHEGH HEHEHE HEHEHE HEHEHE EEE 
1 111 1 oogq9 187430 YOZ2: MOV ;SET TTY ENABLE 

ten pH tes pt EseS 167414 1 5c80 MOV visaik SrAL 

TeDS GLLISe Glaze? Soreey 167316 ozo: Hee pC STALL Ser TO de TO SCOR SPACING 
iS ise fara, cimme H A. Gm  ee 

1508 Oite10 116767 000030 167454 HOVE ' MTCL ‘IE, TO SPACE FORWARD 

lees GLisee dierer QOOME IGGS SOR: Av? Wa Ete Shoe 
Ue De ne a. pa 

Be BEES Big, RAR ee ed 

1818 O11e54 16767 040000 167404 HOV #40000, ,STAL :SET TM STALL 

1516 011264 016767 167310 167374 1$ MOV YSTAL, STAL 

1517 Olle72 004767 4 2g JSR PC, STALL ;D0 YOZZLE STALL 

1518 011276 012777 O33462 167210 MOV ARORA. aBA :SET BUS ADDRESS 

ie Suis acy ME eee de 

1521 011314 016703 167236 MOV : 

1522 011320 103 COM : 

1523 011322 767 000020 167222 BIT :SEE IF CORE DUMP 

: bes olise 1402 BEQ y0z¢0 IF NOT: BR 

1526 011334 Goel ROR R3 3R3 = FC/2 

1527 011336 060377 167152 YOZCO: ADD R3 aBA igeT REVERSE ves ADDRESS 
15e8 O11 3ae bie"? 000076 167322 HOV 76 TCL *SET READ REVERSE 

1530 011352 012767 O00070 167312 YOZC1: MOV #70, MTC1 ;SET READ FORWARD 

Heah Pita Risers AeAze ipeka Voce: toy 6 cI arc, «= fae mac Ts COT 

1533 011374 000167 007574 IMP TAPG ° :GO_READ 

. 1534 011409 036777 004000 167200 YOZD: BIT #4000, aSiR spe wi SHOULD CHECK ERRORS 
tea? otiais oorded 1O/eee Bea = YonbE tee TF TREE MAAK TINE 

Hee Blltie Gie7e7 oioooo ie7ise §=— BIT —s10Do,nocro | SEE TER Reverse 

1540 011426 012703 o3346e MOV BROATA R3 

1541 011432 016704 167120 MOV NCNT, RH 

1542 011436 605104 COM 
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1543 011440 032767 000020 167104 BIT #20, UDES sSEE IF CORE DUMP. 
1544 11446 001402 BEQ YOz04 IF NOT: BR 
ious O11450 I CLC 
11 ROR RY ;SET TO FCv2 
1547 011454 060403 YOZD4: ADD RY, R3 SET EET BUS AOOREES 
iev8 3 Bt tes neg aed 167062 Bt #2088, UDES sSEE I FP 
iat Gtiare ume mes 2 
155) seta pao es 005752 Y02D2: Tap PC, ERe ise pe cficeK RRORE 
1553 011500 30 BR YO2F 
1554 011502 9012703 033462 YOZD0: © MOV #RDATA, RB 
1555 011508 03e/67 002000 167036 BIT #2000, UDES fee IF PE 
1556 011514 001001 BNE Y02D3 F SO: BR 
1557 011516 005723 TST (R3)+ :SET EXPT BA 
1558 011520 004767 005726 Y0203: JSR PC, ER2 GO CHECK ERRORS 
1559 011524 OO00416 BR YO2F 
1560 011526 004767 o0S622 YOZ2D1: JSR PC, ERCHK sELSE GO CHECK ERRORS 
1561 011532 032777 O20000 167046 YOZE: BIT #20000, ISWR *SEE IF SHOULD CHECK DATA 
1Sb¢ O11540 I 19 BNE YOZF IF NOT: BR 
1 1154; 167130 TS TMFLG ; SEE IF TAPE MARK 
1564 011546 001005 BNE YOZF 
1565 011550 ? 167136 TST RTYFL ‘SEE IF RETRY 
1566 011554 001004 BNE YOZFO BR 
1567 011556 004767 003710 ISR PC, DCHK ‘ tELSE 60 CHECK DATA 
1568 011562 004767 o02452 YOZF: JSR PC’ DS3 - 360 BLERR HEC AREA 
1569 011566 i0s 167016 YOzFO: TSTB atKS *SEE IF HAVE NEW STALL VALUE 
1570 011572 100 BPL Y02G ' SIF NOT: 
1571 011574 lee 000203 167010 CMPB = s«-#203, JTKB >SEE IF CONT C 
1572 011602 001026 BNE Y026 IF NOT: BR 
1573 O11604 012704 O26017 OV #MSG44, RY 
1574 011610 000 TTOUTT “PRINT YSTALL REQUEST 
1575 O1l612 616703 166762 OV YSTAL,R3 
1576 011616 p02 OCTPP sPRINT PRESENT STALL 
1577 011620 010067 167022 MOV RO, TEMP3 *SAVE RO(REC CNT 
1578 O4%1624 012705 OO00600 . V STAL,RS SET ADDRESS OF YSTL As: 
_ 1579 011630 012701 o00006 MOV :5ET NUMBER OF CHAR TO INPUT 
1580 011634 012702 177777- MOV #-1 Re >SET MAXIMUM LIMIT 
1581 O11640 012703 00 MOV #2000,R3 >SET MINIMUM LIMIT 
1582 O11644 004767 011430 -- JSR PC, TTR GO GET VALUE 
1585 011650 016700 166772 MOV TEMPS, RO "RESTORE RO(REC CNTR) 
1589 011654 000167 177272 JMP Y0Z *RESTART YOZZLE 
1585 O11660 122777 OO00207 166724 YOZG: CMPB #207,aTKB *CHECK FOR CNTL G 
1586 011666 001010 BNE YOzI 
1587 O116 767 OO0176 166710 CMP #SWREG, SWR sIS SWREG SELECTED 
1588 011676 004 BNE Y0Z1 
_ 1589 - 011700 6706 CLR aTKB ;CLEAR CNTL G OUT OF BUFFER 
1590 011704 004767 Olesi2 JSR PC, CNTG :G0 GE SWREG 
1591 011710 032777 O40 166670 YOZI: BIT #40, JISWR *SEE IF SHOULD CONTINUE YOZZLE 
1592 011716 O01402 BEQ YO2H :IF NOT: BR 
1593 011720 O00167 177246 IMP Y020 ‘ 
1594 011724 012777 166656 YOZH: MOV #100, TKS ;SET TTY INTERRUPT ENABLE 
1595 011732 000207 RTS PC EXIT ‘ 
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DAA tee gap tt npcemrerenenie egret oman ie crc Rt 


ETH HET Thi 
eT: C (7M ies: ON THE SPACE 
Ne rt mH ehh Ub BE FIRST MEN 


eae REEORE TH OPERATIONS AAG REGUIAED. 
cok NSP 1s moe at ne 
: E IME SPSce OPERATION T0 SURE THAT PROPER 


5 RAARASAARSSHLELLSLESLAAASLELALALLLALASSASELLL ELSES ELSE 


+ 


HOV 
TST 
BEQ 


23 


MOV 


pat] 
33 


rsh feet | 


eyes 


COM 
INC 
MOV 
MOV 
MOV 
MOV 





TSTAL,STAL 
pe STALL DO TURN AROUND STALL 
ort310. EMAOOR 
TMEX ;SEE IF T™ 
BO :IF NOT: BR 
8-1, aFC 
MTC 
88K TM, RTRN 
T ; TO ™ 
#10090, aSWR Here SHOULD CHECK ERROR 
BO : BR 
8MSGSS, EMADOR 
a4 ;SEE IF TM 
BTM : IF SO: BR 
Pc, ERet — ;PRINT ERROR 
BRDATA,R3 
REAT RO 
RD ;BUILD SPACE AMCUNT 
acaeeorn ;SET ERROR MESG ADDRESS 
#32, MTCL T 
sai RTRN BET RETORN OBRESS 
RO, STAL - s5€T INTERRUPT TIME MULTIPLIER 
TAPS 360 20 S 
BROATA, RS 
Bul STAL +D0 STALL 


ait 
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Peretistiiiitrititititiiititiiitittittiiiiitert titer its 
: DEC STAL 


| xT 


i 
1 
1 
1 
1 
1 
1 
i 
by 
1 
1 
‘| 
1 
‘1 


Soo C oe: 





Mu oe he, DATA RELIABILITY PROGRAM 


i 


ie7e 


0 0 0b 9b 
row 
aa 


SESRREERES 


= 


POOONTOrrwu 


BBIFRLSG 
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TL ibbitbdbhbbbtbibgdlbibdidtttptiii bit E itt DEEL ELE 
sRANDOM CHARACTER COUNT GENERATOR: 


THIS ROUTINE ENTERED VIA Rare 8 SWITCH 


eoete ery eee 
SS ee 


om #-20.R1 T HIGH INIT 

MOV #-4000. Re SET LOW LIM 

Bie ei RANSAY sed peated seat: 
V RANSAV. FMCNT 

Hoy 8-1,PAtTS we DATA RUN TTERN 

RTS PC 


5 Se SE SESE eg Eb EEA ESE AE EE 
sRANOOR RECORD COUNT GENERATOR: 


S ROUTINE D VIA CONSOLE SWITCH SIX (6) 
ge. TS ene A RANDOM NUMBER OF RECORDS 


TA. 
; THE ra a ARE ONE (1) TO FIVE HUNDRED (S00) OCTAL 
RE R BLOCK. 


PrTTerTiirititirrririiiirirititiiiiiiritttitittittt ity 


MOV #1,R2 $61 LOW LIMIT 
#500, R1 T HIGH Ht MIT 
PC, RANG GENERATE NUMBER 


J 
MOV RRASAV, RCNT Ser RECORD COUNT 
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3 SR E48 9 9 9 0 9 J A a 
5 TEST CONDITION ENTRY ROUTINE: 


S THIS POUT IN us aes THE OPERATOR 
i i rie! | Y PORTERS 
es art Sate STARTING 


: a a a mae 


te 

gl ia NITY P ITY, NO 

HN Re ThONce TO PRINTED REQUESTS AT THE TTY. 

Aue Ph ee ec 

Reus eit Ls Fe eye. 
“ie OR ROUT RESPONSE 18° e16 STORED 

zi it: a EOS CF UM EO 


; ReOuest 15 I3 A AE Fara ali BE 


i Lk N SELECTING DENSITY, 
t ee ei 


) WITH A_ONE ( 
TH AT THE. 


nt ir (TM=0) 
mf peal NO Th TO “enaes Tie eR 


Foust ARE ENTRY ie THE DESIRED 
ART TE, ERO TURN ROUND STALL ae 


fe SHOULD INPUT FROM TTY 


es E POINTER 
AR £6 UNIT COUNTER 


ge 
Gees 
es 


SNS 
p- bh +b —p-p 
WOrIMUIL 


O— b= D-= b— B~ b— 9-- 8 9 = 9 p= § — pp 
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JSR 
ge 


BIC 
Vv 


TINP2A: 


w 
_ 
oO 


TINP2B: 


S32 


TINP2C: 


2 
a 


sagarys 


TINP3: 


: 


Baysesn sus 
. 


Saseee5e 


PC, TTR 


SEQ 0072 


;GO_ INPUT PARITY 


PFE Ar. Mex NEW PARAMETER 
1B SS OR Pres restr 
;REQUEST FORMAT 


;BUMP_EOT UNIT COUNTER 
gee IF UNITS 
Sat DOK FOR NEXT UNIT 


*CLEAR UNIT POINTER 


;SET UNIT EOT COUNTER 
;PRINT RECORD COUNT REQUEST 


: CHARACT 
SET MINIMUM CIRET 
iSove RECORD COUNT 

;PRINT CHARACTER COUNT REQUEST 


TO INPUT 


SEPT CHARACTER COUNT. ADDRESS 
SET NUMBER OF CHARACTERS TO INPUT 


| ae CA 
T CHARAC ER COUNT 

T TO TWO’S COMPLIMENT 

VE rs OUNT : 

PRINT PATTERN NUMBER REQUEST 
PRINT PATTERN 

CLEAR EXTERNAL DATA FLAG 

SET PATTERN NUMBER ADDRESS 

SET NUMBER OF CHARACTERS TO INPUT 
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Ss ee en 
13516 012704 026404 MOV #MSG&9,R4 
tis) Bisse) Glgree ssn aig Pp 5 
eS Hee a Bre" Gee ep 
Fae a Se, ae 

; 10009 ates Tyourt mrwe.fa REQUEST INTERCHANGE READ 

= :PRINT a eon SETTING 


eat 


;REQUEST SINGLE PASS 


iy thre Rete 
et tas Hn 


SS 


perio eeanourin 
tee 
Sgewesees 
=k 


8 
od eee 
2niSSEES 
eared 
on 


TSTAL ,R3 

;PRINT TA STALL 
STSTAL,RS ;SET TURN AROUND STALL ADDRESS 
#6,R1 ;SET NUMBER OF CHARACTERS TO INPUT 


3 


SRR EBREE sa lol sana erne ce eon Ue OOO SS aaa 


OOOOOOOOO OOOOOOO VD OOOO OOOOOO0O0B000000000 


Bs bs Bs hs Ph Bs Bb b= 0 bm ee eh Pe he heh be heh 


ze TINP4: SclEL sere F sort SENVERSATION 
e s 

3p ear tecvo, RY i 
3670 104000 TTOUTT ;PRINT READ STALL REQUEST 

016 MOV RSTAL,R3 
7 OCTPP ;PRINT READ STALL 

te NOY a gg a a ER OF charac TERS TO INPUT 
00 17h i HOV s-1 he : IMIT 
wes tures fae me, | SPI Hr 
37204 012704 1 MOV eMSG41,R4 
ve 104009 “ TTOUTT satis ;PRINT WRITE STALL REQUEST 

: OCTPP , BR NTR 0 STALL 
3740 oi 74 MOV SWSTAL, RS ESTA ADDRESS 
ve 12708 777? Moy selae 1 MUPGER OF GRRCTERS TO INPUT 
fe te > Borat4 Wen HR bay Init 
3764 12764 e234 40 aMSG42, RY 
TTOUTT ;PRINT TURN AROUND STALL REQUEST 

soe 
4000 
4004 


8 
Somer 
sae8 
nm 
ai 
3383 
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bo bs bos B= pio be pe 
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Boers? 164602 
905303 
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164866 007% 


MACYL1 27(732) L1-MAR-76 14:46 PAGE 44 SEQ 0074 


TPOS!: 


mE, pave an 


CLR ScirL sLERR SHORT CONVERSATION FLAG 
0 CONVERSATION FLAG 
;UNIT DESCRIPTION peartiowe SUBROUT INE #44#54444% 

j 

TEMP2 ;POSITION CHARACTER 

DEC R3 SEE IF DONE 
BNE TPOS :IF NOT: BR 
MOV UNP RO {LOAD UNIT POINTER 
BIS TENPe, UNI (RO) sLORD CHARACTER INTO UNI(RO) 
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2006 / 
2007 eee ttt IIIT rt eee terer errr erty 
;DATA SETUP ROUTINE: 
l ETHTS ROUT INE 1S Us USED 10 GENERATE. IN INTO re ENTIRE 
ae EA eaters meal 1 BPP TO 
shi BAe Da Bd ERATOR AND ONE Ere Hao) toAtA PATTERN 0) 
5 
shi EHUTCHSUTLL, Bea ANY PATTERN APRESENIED.OT THe oe prepaRe 
e016 sBY USING Theney Aso CALLED ore. {NAINDEC~11-D2TUF-A-D) 
Eat Beat prea a oe 
201 *THIS ROUTINE i re USED TO CLEAR OUT THE 
eed RE 4000 OCTAL CHARACTERS) BEFORE EACH 
1 CORBA E ER EAD. 
spss : RERSSRSRAL ERK SHAE ERASER ERAS LER EKER ERE REEL ERLE SLL LHR SE 
14062 7 001006 DSUP: TST ROFL IF DID RANDOM DATA 
sos Bie ae . Q DSO IF NOT: 
nse Btugse BOSTE? 164636 oso: fer RaeOF hey AUTO SEQ 
[+ . 3 
sOS ties OD abe BEQ DSOC IF NOT: BR 
2029 O14100 005767 . 164454 TST PATRN *SEE IF AUTO RANDOM 
2030 O14108 1 BPL IF NOT: BR 
1 014106 004767 000714 ISR PC, DATR ELSE GO GENERATE RANDOM DATA 
e032 Oui RTS * RETURN 
14114 164440 000152 pSOC: CMP PATRN, PATS >SEE IF NEW PATTERN 
Spae BiNied Greens | 1644 ae tCbee +E UATE DESCRIPTION 
Soe pais 042 1eOES BIC ian ,R3 >MASK EVEN PARITY - 
3037 O41 34 000136 cH PARS, Ra sSEE IF SAME AS LAST TIME 
2039 eyes 10367 000130 MOV Ba Bors Ta ITY 
2040 O14146 004767 000724 JSR PC, CRCLRC :GO GENERATE EXPT CRC/LRC 
2041 0141S2 000207 DSOB: RTS PC 
eve O1Hi6 12703 027454 DSOA: MOV #WDATA, R3 : 3R3 = ADDRS OF WRITE BUFFER 
14160 016701 164374 MOV PATRN.R1 :R1 = PATTERN SELECTOR 
2044 O14164 010167 O00104 MOV R1,PATS 
204S o14170 Obe701 000001 | R00 #1,R1 ;BUMP POINTER 
Bit Baise. 101 ROL Ri ;MAKE PATTERN SELECTOR EVEN 
2048 O14200° 000171 002770 IMP aDATBL (RI) :G0 GENERATE PATTERN 
2049 014204 032777 O10000 164324 DS1: BIT #10000, aDT :SEE IF 7 CH 
2050 O142l2 O01410 BEG TF NOT: BR 
2051 014214 O12702 oo2n02 MOV #2002 :SET BUFFER SIZE 
2052 014220 012701 027454 MOV pin We Ri jSET START OF BUFFER 
2053 tweed buevel 140300 ps2: Bic #140300, (R1)+ MASK FOR 7 CH 
2054 Ol4e DEC ;SEE IF DONE 
2055 014232 001374 BNE feo IF NOT: BR 
05 bie 04767 0006 psea: JSR PC, CRCLRC GO GENERATE EXPT CRC/LRC 
14240 0127 O53: MOV #2000, Re *RO=BUFFER SIZE 
2058 O14244 Ole701 033462 MOV #ROATA, Ri *RISREAD DATA START 
2059 014250 o0S0e1 DS4: CLR (R1)+ *CLEAR BUFFER 
2060 O14252 005302 DEC Re >SEE IF DONE ALL 
2061 014254 001375 BNE DS4 *IF NOT: BR 


—_—-- —---———- —- - = ee 
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OZTUAF.P11 | 
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he 


Ga ee er ola 
RET 

Bisa) feare? GOUT seu 
rece 
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J oIAee eee § 
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i 
= 


See nRe Bae: 
ie 
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seeaesee 


fururu 
9b 
het a 


2 
8 
SRapRe ee 


SEEEEESE SES 
Reset ts 
eae 
TIITSSyse 
V8 = 
£5 8 


_—_——_— 


164246 


PATS: 
PARS: 


DATO: 


Baroa: 


DATOC: 


DATOD: 
DATOE: 


DATOF: 


DOFL: 
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RIS 
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aM 


;GET UNIT DESCRIPTION 
; PARITY ~ 


LEX 
:PATTERN NUMBER SAVE 


EXTERNAL DATA INPUT FROM H/S READER (256 CHARACTER MAXIMUM) 


TST 


iCLEB T oive QCATION 
;SEE F RYE FOUND START CHARACTER 
SEE IF CHARACTER Is 0 

IF F $0: BR 

iB SET CHARACTER FOUND FLAG 


SAVE DATA SIZE 

568 GET F DATA CHAR 

ieee Nor READ ALL 

ae = CTAR OF a BUFFER 
= SIZE OF DATA FIELD 

isepeal ‘2 OF DATA FIELD 

1A dl 

;SEE IF AT END OF DATA FIELD 

SIF NOT : BR 


;ELSE REST ART FILL 
sEXTERNAL DATA FLAG=1 IF ALREADY DONE 


SEQ 0076 


Ma ae TUB DATA RELIABILITY PROGRAM 


2103 
cis RINSE pHEyDL 4zZ7Pz 

1 14462 2 
B10? Bice O101e3 
2109 O14466 001375 
aH 014470 000167 177510 
He ton 
cH giWry posnoy 
cits 

ll 
s1i8 
te fee phen 000001 
sisi eae 01 004004 

l 14814 1101 
2le3 O14S16 106101 
gis? 14S2eG 005302 

12s 14S22 001374 
sis O14Se4 OOO1E7 177454 
2le8 
5150 014530 012701 000376 

131 014534 61 
sis 014536 O00167 177746 
3 

136 ' 

137 O14S42 012701 oS2e52e5 
sie 014S4%6 000167 177704 
i 

14e O14SS2 012701 125252 
2l43 O14SS6 000167 177674 
2144 
si 
sis yaad 012701 1leSesSe 
2148 O14S66 Ole702e O05eSe5 
tt Biase 012704 001002 

180 014576 010123 
2151 014600 010223 
5125 014602 005304 

bf 614604 001374 
Size 014606 000167 177372 
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Bata: 


DATIB: 


DATe: 


DAT4: 


DATS: 
DATE: 


DAT?: 


_DAT7A: 
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SALL ONESHHHHRREEEE 


a -Ri= 
. RA DGRO COUNT +2 
R1, (Ra)+ : BUFFER 
NE DATIB :IF NOT: BR 
JMP DS1 * RETURN 
sALL ZEROS#HHeeHHERE 
LR Rl. ;R1=DATA 
MP BaTIA TOAD BUFFER 
SWALKING ONE ##s#x#% 
HOY #1,R1 ;R1=DATA 
MOV #4004, R2 ;R2=CHARACTER COUNT+4 
MOVE RI, (R3)+ *LOAD BUFFER 
ROLB = RI ;SET NEXT CHARACTER 
DEC p> IF DONE 
BNE DAT3B tTF NOT: BR 
IMP DS1 : RETURN 
;WALKING ZERO#HHHHHEEEE 
Hoy #376,R1 ;RI=START OF DATA 
IMP DAT3A ;LOAD BUFFER 


sALTERNATING ONE/ZERO##HHHEEREE 
MOV #52525,R1 3R1=DATA 
JMP DATIA ;LOAD BUFFER 
; ALTERNATING - ee 


MOV #i25252,R1 #R1=DATA 
JMP DATIA ;LOAD BUFFER 


;ONE/ZERO IN ALTERNATING WORDS#HHeeHHHES 


MOV #125252, R1 ;SET WORD 1 
MOV #52525. Re WORD 2 

MOV #1002, R4 es OF ENTRIES 
MOV R1, (R3)+ ;LOAD WORD 1 

MOV Re’ (R3)+ ay 

DEC SEE IF D0 

BNE DAT7A TF NOT: BR 

IMP 0S! RETURN 
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702 004004 
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te see 000377 
14716 O0Ql67 177534 


pier te 002002 
147 12701 000376 
O0026i =i 


tT Tw 
Hae IE ee urururury furururururururururusururusururuunarary 


BSSOVRRLGVHLSSBURRL GV S.saNorulscsnd—cwe won 
[=] 
e 
——-—O 
Rs 
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DATIO: 


DATIOA: 


DATLI: 
DATLIA: 


DATI2: 


DAT12A: 


DAT13: 


DATL4Y: 


DATIYA: 


;WALKING ONE/ALL ONE IN ALTERNATING CHARS#### 


HOV HRT” ESET BLK Bre 


CLC 
MOV #177400,(R3)  ;LOAD ALL ONE BYTE 
2 S. Ri, (R34 iL AD wa BYTE 
DEC Re ’ 
BNE T10A ;D0 FULL BUFFER 
Sl ? RETURN 
sALL BITS O-377HxxHRHRHEE 
CLR R1 ;R1=STARTING DATA 
HOV #4004 ,Re jRe=CHBRACTER COUNT+4 
INCE RI’ : TA 
DEC R2 :SEE IF DONE 
BNE DATIIA IF NOT: BR 
IMP DS1 * RETURN 
sALL BITS 377-DxxxeRREREX 
MOV = 8377,R1. ;RI=STARTING DATA 
MOV #4004. Re *R2=CHARACTER COUNT+4 
NOvE RL, (RS)+ *LOAD BUFFE 
DEC - Re ‘SEE IF DONE 
BNE = DATI2A -IF NOT: BR 
IMP. ODS * RETURN 
ALTERNATING CHARACTERS O AND 377xxxexKHxEE 
MOV #377,R1 :R1 = DATA 
JMP DATIA *LOAD BUFFER 
sWALKING ZERO/ALL ZERO IN ALTERNATING CHARS###x#x 
MOV #2002, Re ;SET BUFFER SIZE 
HOY #376,R1 :SET WALK BASE 
MOV R1, (R3) ;},080 WALK BYT 
BIC #177400, (R3)+  3CLEAR HIGH BYTE 
ROLB Ri *WALK ZERO BIT 


Re 
BNE DAT14A ;FILL BUFFER 
DS1 ;RETURN 


SEQ 0078 


us DATA RELIABILITY PROGRAM MACYLL 27(732)- JI-MAR-76 14:46 PAGE 49 


RUTO SEQUENCE PATTERNs#eeeenee 


T15: ; ENTRIES 
Bi 5508 t : MOV teats, Ri - ; oParTe 
09} MOV . #10 : PATTERN 
: ( ise. (R3)+ ; 
RY ; Bia Bote PATTERN 


E wr. opt BUFER 
RETURN 


= = b= 0 6 8 


2 0- P= 0 + o-- > -0—-b—p- 


20D MOU £ LTue- 


STRoRNBa sees 


ses UNA 


= 0— 0 - 9 p= p 2 9 pe 


pists 


;RANDOM DATA GENERATOR SUSROUTINEs#eeeeeeee 


V FMCNT,.RY 
nO alOATA, RS 


rsa 


: 1 ADRESS 9 Ma ree OF BUFFER 
RANGAY (R3)+ : 
RY ; 


tH HIGH 
T LOW 


SSN DOSAS 


DATRO 
PC,0S1 


Bi »ROr 


M DATA FLAG 


NOT: 
ier CHECK FOR 7 CH 
RANDOM DATA SELECT FLAG 


: 
: 
| 


0 +0 +0 + 0— 0 0— 0 b= bb oo pe 


Sere See 


: 
: 


Furufurufurar 





Tbe Tus DATA RELIABILITY PROGRAM . . MACY11 27(732) LI-MAR-76 14:46 PAGE SO 
02 UAF . ll * 5 


555g : ;deseensneneeeneneseneusneusenesennesenensenenseeenesese 
;CRC/LRC CHARACTER 


THIS ROUTINE WILL sonnei na | SAVE THE EXPECTED 


HRESoRo etaE SP OPeRATING In WAS nobE 


PITIITitiiittiititiiiitiitiiiiiiiiiiiiiiititiiiiriitess! 
FMCNT,RO ;SET RECORD SIZE 
TA,R1 ;SET START OF BUFFER 
(R1),R4 
Pp 


PC,C 
PC} X 


;GET CHARACTER 
G0 GET PARITY OF CHARACTER 
;XOR CHARACTER 
- RY sROTATE 1 RIGHT 
cL2 TP NO CARRY: BR 
#400, R4 ;SET BIT NINE 


;SAVE CHARACTER 


~ 

— 
Bee 
St a i | 


_ 
R 

im +0 ~-< 

OOLMNOORO 


;COMPLIMENT BITS 2,3,4,5 


IDOWOw 


fuse 


Ob —= b—~ b ~ 0 & = b= B = & + B= bb 0-2 Bo § po pH Hoh Bs 


ENSEHERE EAS LZRSENG SOL 


;IF LAST CHARACTER: BR 
3GET NEXT 


8 
SSR 


2 


;sCOMPLIMENT ALL BUT BITS 385 
;SAVE EXPECTED CRC 

300 EXPT LRC 

;GET PARITY 

:XOR CHARACTER 

;D0 ALL FOR LRC 


C.X - sXOR_CRC_TO DATA 
XORS, EXLRC SAVE EXPT L 


RY SEE a Of CHAR 
CLPE SIE NT 
#10, UDES soe F ‘even PARITY 


st, RY :SET 0 CHAR even PARITY 
;BUMP POINT 


Re vap eI Raee ans 


nae 
£Mo 


Eee 
g 
cl 
4 
4 
a 
se 8 
A 
a 
ee | 
Be 
4 
4 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
st 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 157 
1 7 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
| 
1 
1 


ay 
3 





DO? 
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: 
: 
: 


ca GOCE ae nails 


P 4 PC ;RETURN P 
ah ae IF : a oits 
. : NOT: 
; COUNTER 
;ROTATE TO NEXT BIT 
;CONTINUE FOR ALL BITS . 


@ 
~~ 
4 


ae 


CLP1: 


> Db — b— b— b= Pb b— o — & - oH 


w 
red 
“oO 


;SEE_IF O00 NUMBER OF ONE BITS 


BE EVEN PARITY 
sIF NOT: GR 


IEEE IF SHOULD BE ODD PARITY 
if Bar 
;SET PARITY BIT 


oie 


CLPe: 


btefet tet 


CLP3: 


Tea s] 
Ta 


mow 3 
MOO <cuUM 


;XOR SUBROUTINE: R4Y WITH XORS 


ae 


& gihispoantess 


;XOR SAVE 

i EXPECTED CRC 
TEXPECTED LRC 
_gPARITY COUNTER 


é 


2000 DBDOOOOOOOVWOOOVOOOOVOOOO0000000D 


a oe mb = B28 Bm ps P= b= & Bs PB 0 Bs pe He HS 


E 
: 
: 
if 
528 


uw) 
ae 
Gcooo wm 





ape & DATA RELIABILITY PROGRAM 
UAF P11 


2329 


Bee 


ie 


NN 


aa 


fee 


~- 
~ 


~ 
-— 
—Tr 
£ 
~ 
—-OnNLN 


RERRPR RUMOR MsaseneeeeauT 


eRe RR Ree eee eR eee eeeeeeeeeseeeeesoee2 
Ba earns i ran 
ss 


: 


-_— 
se 


Les 
anes 


Re 


=“ 
—~“ 


163036 


163012 
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DFOCO: 


DF OBO: 


DFOA: 


5 EHH EHO HEHEHE EHH EEE HEHEHE HEHE 
;DATA CHECK SUBROUTINE: , 

;THIS SUBROUTINE IS USED TO COMPARE EACH CHARACTER 

sf DATA READ FROM TAPE WITH THE EXPECTED CHARACTER. 
SANY ERROR DETECTED W ¢ 0. BE 


SPRSSED 10. A Pa A 
eye | 


; 13). 
Terttiititiiriitiiiti tiiitititttiriitittttriiiiits, 


CLR BBC ;CLEAR BAD RECORD CNTR 

SR, «= RENTER 

i’ a as 

MOV SROATA, RI EET URITE DATA ADDR 
SROATA : 


Lee 


BIT 420, \DES ETE CORE DUMP PARITY 
OF sIF SO: 
Be Doce «CEP GAP BE MODE 
S18 RL) See IF CHAR 
NC Ri A mB BOTNTER 
Ne Pe it: 
BR OBC ELSE. cout 
MOVB 820, (R1)+ N OF 0 
HOV I PATS ?SET PATTERN GENERATE FLAG 
cy OFM SRESET CHAR 
MOV SWOATA,R sRESET DATA sg 
BIT , s10000,ROCHD [SEE IF READ REVERSE 
BE” DFO : g T: 
MOV NT, RY GET COUNT 
NEG RY :SET TO WHOLE NUMBER 
BIT 420, DES iSEE IF 
ae ; 
ORR TNT TO START OF WRITE DATA 
; ipod 8 StaRt HEAD DATA 
#1 FMCNT !SEE IF ODD FRAME COUNT 


UMP POINTER 
ofow HE Not: oR 


atest tate 
o330 
o 
o-~ 
—- 
* 


SEQ 0082 


Ma DATA RELIABILITY PROGRAM MACY11 27(732) L1-MAR-76 14:46 PAGE S3 SEG 0083 


. ll 
{ 000001 fe Haak (R2) SEE IF eI O21 
- ° = 
i ; Ts 
HER Bal 
e383 13214 10601 DFOAO: ROR (R2) 
1 a 000001 Te 8 4 ihe) 
: I : bal 
1 i DFOAL: RORB (Re) sPOSITION BITS FOR REVERSE CORE DUMP 
1 132712 000001 | Site #1, (R2) ) 
OL 001401 ee pFba2 
ot ip DF ORe: ae (R2) 
1 12 000001 BITB H14(R (R2) 
t t 8 
1 OB0T2 DFOA3: RORB (Re) 
1 opsets INC R2 sRESET PO INTER 
15768 14 DFOAY: CMPB -(R1),-(R2) DATA Cr CHARACTER. 
HR Be) ws io Bt eM oS Recto coure 
Ea 15776 1 tte DFO: . ERPB (R1)+, (R2)+ sCHECK DATA 
ele g100e 162650 cL OT ERR bab RECORD CNTR 
2414 016010 00476? 000616 OF 1: TSR PC, DRPKF $00 GET aprons AND PICKS 
Se bieted — DF2: the eal CHAR CNTR 
17 Ol ‘001405 BEQ OF3 i DONE ALL: BR 
ae oiehss 7 010000 162530 Bir “ee Wr. AD REVERSE 
i 16 A a BR ' sELSE CC INUE READ REV 
ese Gloss bbe 7e7 1 } rst BERL SEE IF Batt OR 
5u54 DIE0SO OOS7E? ‘162632 eee es 
1 2 BNE ‘a sIF NOT DATA ERROR ONLY: BR 
Se Bleoee Bierha 162612 BOY CONE. RM , 
2427 016062 032767 O10000 162472 BIT #10000,ROCMD § ;SEE IF READ REVERSE - 
e Oikare ‘O0be BY 001130 ine TERI(RY) : DATA ERROR FORWARD COUNTER 
“2431 016100 005264 001170 DF4¥:  -INC DEREVI(R4Y) © me REVERSE DATA ERROR 
ete 016104 000207 ms OFX: RTS PC EXIT 


TwO2/TUJe DATA RELIABILITY PROGRAM MACYLL 27(732) LI-MAR-76 14:46 PAGE S4 


FS bbebel delebdelbdebdebteb-bdebtdebteb bbb E bd tle 
ERROR SUBROUTINE: ” 
‘THIS § SUBROUTINE IS USED TO PRINT OUT ANY 

FOUND DURING THE DATA CHECK. 


ee a eee 
‘ERROR Bist intte, Ere 
a Ay eee? g FOU ea, 


ae oy ra hes ‘ae 
REDS) ig ee ta Ot See 
sSIEPED TBECeeT Toe Ine TEN CL 10D cree ER 

sRECORDS walCs conta 6 eee IGIENT ROPER 0 OF — 


SER SRRRRIAA Gia eRe ee ete este 


ft SETTING CONSOLE SWITCH TEN (10) TO A BONE 
THE PERRTOR MAY 79 Hat TON ANY ERROR 
CH FIFTEEN (15) T 
se nensansosenebasadennsanaunanbscauucnsugnansncdseueed 
016106 032777 002000 162472 DERR: T , aSWR F F SHOULD PRINT ERRORS 
bette ata 000160 OP pe KP PRINT 
Oiblee raed 16254 DERRO: INC Bere i: 
i6le6 005767 1 S L IF NAVE PRINTED HEADER 
rae ees aoe PC. PAPRT sHE $0: mR R 
pelea ae neta way #M5G1,R4 ; LOAD ERRORS Moe ER 
Biehe BE coors Te pc roar PRINT 
states 01 4735 DERROA: MOV #MSG4, RY 
016156 104000 TTOUTT PRINT CHAR NO. HEADER’ 
Oib169 010203 MOV R2,R3 
Oibibe 162703 033462 fee 8ROATA, RI sPOINT TO CHAR 
161 Gse7er 010000 162364 BI #10000,ROCMD §;SEE IF READ REVERSE 
2478 bis 1402 BEQ DERROB’ SIF NOT: BR . 
2479 016200 010503 MOV RS,R3 GET CHAR NUMBER 
Suet iiteaed DERROB: Sepp oa ;PRINT CHAR NUMBER 
uBe 16208 012704 024723 HOV sSG2,R4 neers 
84 bigei4 b327e7 010000 162340 BI #10000, ROCMD ERIN RERO REVERSE 
2485 Olée22 00140 BEQ iF Nor: 
2486 Dibees 111103 HOVB (RL). R3 ‘GET CHAR 
Sea pipsee 1141 : DERROC: MOVB -(R1),R3 ;LOAD EXPECTED DATA 
2489 016232 004767 005704 DERROD: JSR PC, DOLIT :GO PRINT CHAR 


Mit ee, DATA RELIABILITY PROGRAM 


= iS 3% oicom ssen 


2 fies His 
ae ean 
E fee S _ 
: ’ 010000 162266 
t fies 
Sa Hie He HE ine 
Se HR Big, ooo ue 
i Yigg, oP 
Ve 
11 O16344% 105267 162306 
1 16350 1 7 162300 
Bn tines Ws 
2515 016364 135565 
i HES ME rm 
i Hie BS NGS ues 
e500 Diao O16 
1 eat 15702 nd 
Ss HAs Bem Be 
eSe4 iris 03e767 O00001 ib2lee . 
Se tine toe | 
2Se7 tee poses 
1 16767. 162110 162172 
8 firs be tty 
eee 
Su tine ie eu 
Bs fita feu fos 
2535 16508 assie2 
Se HER BE soe 
2539 tte ocod24 
es40 Ol6See 1 18 
Si Hite fice, oom sen 
eS43 016534 162701 000024 
e544 016540 162702 0000e4 
eS4S 016544 000407 ~ 


ee eee ey es — 


HO7 
MACY11 27(732) IL1-MAR-76 14:46 PAGE SS 
TToUTT sno noceo _ieezT=PEGHEYED pads 
Bie Eine 
BERRA: exe = BcRRD RS ;PRI 
, 
Perna a RECORD CNTR 


#10,88C 
DEREX tT NOT: BR 

is F PRINT INHIBIT 
:PRI 


I 
SO: BR 


R 
1S ci ;RE 1 BO ease CNTR 
CMPB ,B8C : g 3 BLD BTHS 
ee . jatie BBC 
CMP $177767,RS : SEE is ON LAST EIGHT CHARS 
a Veceaee HeET chee cue 
att #1 ” ADCO eee F READ RE 
BEQ ie NOT: 
MOV SWDATA, RI ;GET START OF BUFFER 
MOV rioea :GET START OF BUFFER 
#10, sPOINT TQ START +1 
aop #1, PMCNT IF op8 FRAME RouNT 
BE DEREX iT NOT: 
1378 (Re)+ BUMP. PAINTER 
DERRYA: MOV MCNT, TEMP LOAN CHAR COUNT 
COM TEMP 
iN 0 TEMP POINT TO BUFFER 
MOV TEMP Rl ;POINT TO NEXT 
ADD aWDATA, RI :POINT TO NEXT WRITE CHAR 
MOV TEMP1 Re :POINT TO END oF yfeA0 DATA -8 FORWARD 
ADD #RDATA, Re *POINT TO NEXT C 
i BR DEREX tEXIT 
DERRYB: suas BBC “REPOSITION BBC 
read #24, RS 20 CHARS 
ete DERRG RDCMD ee OT EORCUEREE SO 
i 
Sua #24’ Re RESET POINTERS 
BR DEREX 


SEQ 008s 


popes TULe bata RELIABILITY PROGRAM 


he 
£ 
N 


= 
Ses 


~“_ 
pang 
o 
NN 


at eas a 
StRRAS Aa ay 


oOo000 


QO0o0000 
ob & — b= b> 6 Pp — OH ~ he 


o000e4 
000024 
177777 


DERRS: 5 


DERRE: 
100000 162014 DEREX: 
162066 
002000 161774 BT 
i 
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SEQ 008 


:akIp FORMARD 20 CHARS 


8-1, RS SET TO EOR 

#100000, 2SuR see IF SHO SHOULD HALT ON ERROR 
F PRINTED 

eae ae SHOULD PRINT 

a seit 

DE Pe A ERROR FLAG 


Tnde/TULG DATA RELIABILITY PROGRAM MACY11 27(732) L1-MAR-75 14:46 PAGE S7 SEQ 0087 


5 E983 99 9 ES A a 
‘set, AND PICKS SUBROUTINE: 


S SUBROUTINE IS USED TO nO THE NUE 


Pater pap bu 
fa ate cutee 
a) 
eer a GieeeLSuINe TesOvegeOn 1s 
Bout 3 SE ACCUMULA 
FUP ee eed A 
:DI a ANY HAE gy apie CONSOLE 
: SWITCH OURTEEN TO A ONE (1). THE PRINTOUT WILL OCCUR 
AT THE END OF THE CURRENT BLOCK CYC 
; RRARAAAAELALLLRARLLLE LL LLLL LALLA REL ELELALAL ERE L ALLELE 
005067 162004 DRPKF : CLR TEMP 


Soars cn ose WON RSE EERE IU ORC REER 


16632 
Diese 005067 162002 TEMP 
TEEME 111167 ata MO Hts LOAD GOOD CHAR 
Oibess i ? Ibi 708 MO Rd} » TEMPS oe BO ae 
i 16467 45577 1 NOV eae Pp ' 
bike76 16467 001010 1 HOY BaPI (Ra) DPP 
16676 032767 010000 161656 BIT #10000, ROCMD ;SEE IF READ REVERSE 
itm 1 | ot Poot 
1 12414 MPB = =(R1) , -(R2) INT TO CHAR 
16710 112167 161726 MOVE  (R1)+, TEMP LOAD GOOD CHAR 
16714 1367 61 MOVE (Re) +. TEMPe : BAD CHAR 
16720 ? ieee DRPK: JSR PC, OROP *GET 
16764 004767 000222 JSR PC’ PICK GET PICK 
16 RTS PC EXIT 
016732 116703 161704 DROP: TEMP1,R3 5R3 = GOO 
016736 116704 161702 MOVE  TEMP2;R4 = BAD CHAR 
16742 140403 oPc: BICB  RY.R3 eer DROPS/PICKS 
16744 601004 BNE G i IF SOME: BR 
16746 RT c 
16750 012767 909019 161732 DPCG: MOV #10, BCNT *SET NUMBER TO CHECK 
16756 15983 1 DPCO: BITB  #1,R3 *SEE IF DROPPED OR PICKED THIS BIT 
16 0o14ss BEQ é2 IF NOT: 
alert 108767 161656 TSTB TEMPS j SEE IF ON PICKS 
1p708 161720 its aBDPP SBUNE. bRBP CNTR 
16776 005777 161714 TST JBOPP . 
{7004 dsev7? 002000 161574 Bre = eeng0,aSWR «SEE SF MBVESPRINTED DATA 
eats pai aae Br eae : IF spe BR 
spit Booed ae ate DPCOA Jen Be’ DEPRT sCaNt Snopes AAD ETCKS 
pie nee eat BR ppt2a 
2614 017026 161666 DPC1: INC JBPKP ;BUMP PICK CNTR 
2615 01703 005777 161662 TST JBPKP SEE IF OVERFLOW 
2616 Ol 190087 BPL DPC2 IF NOT: B 
2617 017040 777 002000 161540 BIT #2000, ISWR SEE IF HAVE PRINTED DATA 


a RELIABILITY PROGRAM 


OZTUAF 
ae 
1 
Su Hine Be a 
1 ot thin 161610 
Ba HN Hie 
4 12767 10 161606 
Se BIR Hite 
17106 005367 161576 
0171le 137 
bitte 
se tue eee 
spas 5 gice 161562 
71 1410 
2634 017130 7 900002 161562 
2635 017136 000002 1615Se 
Pigs A. 000167 177606 
2638 017152 016704 161516 
2639 017156 016467 161534 
2640 Zig 016467 001010 161524 
ou gs sie sPiuas 
seus abs LiS7e7 001 161436 
2644 017210 004767 177526 
2645 017214 000207 
r+) 012704 025343 
264 104000 
2648 teh 161444 
2649 16467 001010 161460 
2650 016467 161454 
e651 062767 OU0016 161444 
009016 161440 
161422 


7 000002 161406 
Dare? 000010 161370 
02535 


HIZORMINS SRS SERN TANNINS 
é 


evetase 


166767 po0002 161350 


ee ee ee ee ee ee ee ee ee ee ee 


attattatta 
itt 
OOOO OO OOO OOOO NOOOOOOOO000BA00000000 


ge - -_- 


MACY11 27(732) 


DPCe: CLC 


‘DPPRTO: MOV 


DPPRT1: MOV 


DPPRT2: MOV 


R 
DPPRTX: RTS 


11-MAR-76 14:46 PAGE SB 


3o= 
3 


a6 


et ot oc “UO 
ee 


PRINT chee weer. 
8 peor PORTER 


tSET NUMER OF BITS 


‘ELEAR Pick: 


ISEE IF DONE 
HIF NOT: BR 
IT 


;GET NEXT BIT 
gee IF DONE 


N 
:R4 = GOOD CHAR 


ie pick FLAG 


260 CHECK PICKS 
sEXIT 
sPRINT DROP HEADER 


;SET DROP POINTER 
;SET PICK POINTER 


;SET NUMBER TO PRINT 


;PRINT DROPS 

;SEE IF DONE 

;IF NOT: BR 

sBUMP POINTER 

sCONTINUE FOR ALL 8 BITS 
;SET NUMBER TO PRINT 


;PRINT PICK HEADER 
SPRINT gf Sat 

;SEE IF DONE 

;IF SO: BR 

sBUMP POINTER 

;CONTINUE FOR ALL 8 BITS 
;RETURN 


SEQ 0088 


wie RELIABILITY PROGRAM “MACY 27(732) L1-MAR-76 14:46 PAGE S9 SEQ 0089 


2670 
2671 j RERREAAL LAA ALA ALL LLA ALAR ALA L LALLA LEELA ELE RE LE RELA SLES 
ae sSTATUS CHECK SUBROUTINE: 
THIS SUBROUTINE 1s USED 7 0, PERF ORM A A CHECK OF 

Spee ROPE) THER Ie Ne CKe ED THE TOE ons 
sp78 rant IN deortibat 1 ano ego AND ALSO THAT 
- okey RE Hai eUheted FAMRLE cfblis. os 
2680 jORIVE ERRORS (ER), AND PROPER FRAME THE SPECIAL 
2681 “CHECK CHARACTERS (CRC+LRC) ARE ALSO SO ENKED WHEN 
2682 ; APPROPIATE (IE: NRZ READ OR WRITE). CERTAIN TYPES 
2683 : IVE ERRORS IN PE OPERATION WILL BE ACCOMPANIED 
2684 "BY THE DISPLAY OF THE DEAD TRACK REGISTER (CC). THE 
2685 : ARE ER BITS 15,10,7,6. THE PRINTOUTS OF BAD 
2686 CRC,LRC,FC, AND BA WILL BOTH THE EXPECTED AND 
2687 "RECEIVED VALUES (IE: EXPT-RCVD). ONLY THOSE REGISTERS 
2688 ;WHICH ARE IN ERROR WILL BE PRINTED AND ALL PRINTOUTS 
2689 5ARE IN OCTAL FORMAT WITH NO LEADING ZEROS. IN 
2690 “DATA ERRORS, STATUS ERRORS ARE PRECEEDED BY HEADER 
2691 ‘DESCRIBING THE HARDWARE UNDER TEST, THE BLOCKING 
2692 INFORMATION, AND THE ERROR TYPE. 
Seas Pertti ittitiitittitittiitiititttttitiiitit tit tieti tes 
2695 017354 016703 161176 ERCHK: MOV FMCNT,R3 GET FRAME COUNT P 

36 017360 032703 000001 BIT #1.R3° ; EE IF ODD 

87 017364 001401 BEQ BeS *IF NOT: BR 
2698 017366 005303 DEC R3 SUMP COUNT 
2699 0173 Q05403 ERO: NEG R3 . 
2700 O01 032767 00020 161152 BIT #20, UDES ;SEE IF CORE DUMP 
2701 017400 001402 BEQ EROB IF NOT: BR 
2702 017402 000241 CLC | 
2703 017404 006003 ROR R3 sSET TO FC/2 
2704 017406 032767 OO0010 161256 EROB: BIT #10,MTC1 SEE IF WRITE OP 
gros 017414 OO1414 BEQ R IF SO: BR 

017416 67 O10000 161136 BIT #10000, RDCMD 

2707 017424 90 40s BEQ ROA 
2708 O17426 012703 o3346e MOV #RDATA, R3 
2709 017432 162703 O00002 SUB #2,R3 ;SET POINTER 
2710 017436 00405 BR E 
2711 O17440 062703 o3346e2 EROA: ADD #RDATA, RB ;BUILD EXPT READ ADDRESS 
271 oir oo0402 BR ER2 
2713 017446 062703 027454 ER1: ADD #WDATA, R3 ;BUILD EXPT WRITE ADDRESS 
2714 O174S2 010367 001432 ER2: MOV R3, CADER :SAVE ADDRESS 
2715 017456 012704 000007 MOV 
2716 O17462 012701 Oellle MOV #BAER, RI 
2717 O17466 005021 EReAO: CLR (R1)+ CLEAR FLAGS 
2718° 017470 005304 DEC RY 
2719 017472 001375 BNE EReAD 
2720 017474 020377 161014 CMP R3, aBA ;SEE IF ADDRESS 0K 
2721 17500 001402 BEQ EReAL IF SO: BR 
2722 017502 005267 001404 . INC BAER ‘SET BUS ADDRESS ERROR 
2723 017506 032767 OO0010 161156 EReAl: BIT #10,MTC1 SEE IF WRITE OPER 
2724 017514 001007 BNE ERB “IF NOT: BR 
2725 017516 005777 160774 EReA: TST arc SEE IF FC=O \ 


/TUL6 DATA RELIABILITY PROGRAM 
oetoar. Pit 


2726 001443 


Sobie? ea 161130 


gb hm pe 


ae” 
: 


bb b&b Be bh Hh pe 


2738 000167 000034 
Sa Hise fae Cu sr 
2741 017606 032767 010000 160746 
os 
2744 ives 
2745 017624 012703 000001 
2746 017630 
e747 01763¢ 160000 160650 
Fe HD BS 
2750 biseu 0427 80307 
2751 017652 
e7Se 017654 001407 
ies HiZ bps 767 161014 
1766e 001427 
2755S 017664 042703 001000 
ee fie 
1767e 102 
2758 017674 032777 O60000 160606 
2759 Bisson 001421 
2760 017704 005767 160766 
276 17710 ei 
1771e Ol 160606 
17716 032767 OO0010 160626 
e764 017724 001402 
2765 017726 O4e703 000100 
e766 017732 pated 001000 
e767 017736 0057: 
2768 017740 001402 
2769 017742 7 OO1146 
2770 017746 O40000 160546 
2771 017754 001421 
e77e 017756 OOS 160714 
Hae, ea 001414 
17764 Ol 160534 
2775 pire the 000010 160554 
5059 B20008 042703 000100 
2778 020004 O42703 001000 
2779. reeites 005703 
2780 Oc00le 001402 
e781 020014 005267 001076 


ee ee ———— 


MACY11 27(732) 


ER2B: 


ER2E: 


ER3A: 


ER3AL: 


ER3B: 


ER4: 


ERYAL: 


ERYA: 


RES RASER 


BEQ 


st 


wo 
L 
o-=OOoe4< 


TST 
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ER3 ;IF_ SO: BR 
E R SET FC ERROR 
#40, NTCL sSEE IF SPACE OPER 
FRER ee fr TIME 
frcnT,RQ he 

; ;R3_= EXPT RECORD SIZE 
R3 arc ‘SEE IF FC = EXPT 
Rae s1E 50; FC ERROR FLAG 


,UDES ; F 


;1F SO: 
#10000,RDCMD § ;SEE IF READ REVERSE 
ER2E IF SO: BR 
#2,R3 
ERC sLOOK FOR EXPT = 2 
#1,R3 
ERC ;GO CHECK FC FOR TM 
#160000, a¢1 *SEE IF COUNT ERROR 
acs R3 ;GET CONT STATUS REG 
#307,R3 sMASK QUT TRA OR UNIT NO. 
R3 3 SEE ANY OTHER ERRORS 
ER3A :IF Nor: aOR 
TMFLG :SEE IF TAPE MARK TIME 
ER36 LIF NOT: 
#1000,R3 *MASK MISSED TRANS 
R3 - ise IF ANY OTHER ERRORS 
ER38 SO: BR 
#60000, 3¢1 E IF EITHER TRE OR MCPE 
TMFLG i IF ™ TIME 
ER38 *TF NOT: BR 
ER, RS GET ERROR REGISTER 
#10°UDES ; SEE IF EVEN PARITY 
Al IF NOT: 
#100,R3 ?MASK PAR 
#1000, R3 *MASK FCE 
ERY ;IF_NO ERRORS EXCEPT FCE: BR 
CONER SET CONT ERROR FLAG 
#40000, a0s ; SEE wi. DRIVE ERROR 
TMFLG SEE IF TAPE MARK TIME 
RY IF NOT: BR 

R,R3 “GET ER‘: 
#10; UDES :SEE IF EVEN PARITY 

4AL tIF.NOT: BR 
#100,R3 : 
#1000, R3 “MASK OUT FCE. 

3 - SEE wit ANY OTHER ERRORS 


ER6 ; : 
ORVER ;SET DRIVER ERROR FLAG 


~ SEQ 0090 


Tnpe Tue DATA RELIABILITY PROGRAM. 
DZTUAF .P11 


160524 
160550 
160624 


e782 020020 032767 002000 


001036 


175362 
020104 032767 000060 160440 


PLECL DIL eRRPePene man Rent: 
SBSH SHR SBSH SHEE 
ORS L 
8 — 
5 £ 


is 

HR TEDSRE 
is 
Re 


160356 


g 


020206 


BBB 
& 
£ 


—OWOOnNrucWwUreO 
ff 
od nr 
g 


: 
one 


a 


rm 
2 

o 
z 


10442 
160320 
160414 


2832 
2833 020314 Oee767 o00002 000574 
2834 Oe03ee 


_— -——- — — —CO—- -_- 


001045 


MACYL1 27(732) 


ER6: 


ER6A: 


ER?: 


ER1O: 


ERPT: 


ERPTT: 


ERPTG: 


ERPTG1: 


ERPTO: 


BIT 


a 
R3 
' RS 
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— UDES 
a 5 ,» CSUR. 


Erea CRCSV 
EXLRC, LRCSV 
XCRC’ 

#23, EXLRC 
#60; UDES 

RP te 
tan R3 
EXCRC, Ro 


CRCER 
MR 


#177000 R3 
XLRC,R3 


Ex 
R3 BCTLRC 
#10000, ROCHD 
LRCER 

R 


SERFL 
JER, ERSAV 
2000, aSWR 


PC, PAPRT 


| fat Arta Beck 


: BR (ALLOW READ OF UNKNOWN TAPES) 
are Me a OR READ OP 


ste IF TAPE MARK TIME 
T: BR 
*SAVE CRC 
:SAVE LRC 


;SET CRC/LRC FOR TM 
jSEE Are FORMAT 14 


Gey" ne Br acTER 
;IF_CRC GOOD: BR 
SET ERROR FLAG 
;GET LRC 


;1F LRC GOOD: BR 
T C 


SEE i READ REVERSE 
ELSE CLEAR LRC ERROR ? 
;CLEAR ERROR FLAG 


;SEE_IF ANY ERROR 
;I1F SO: BR 


;SET ERROR FLAG 
:SAVE ERROR REGISTER 
: SEE IF PRINT 


: BR 
iSEE IF READ RETRY 
:IF NOT: BR 


;BUMP RETRY COUN 
;SEE IF LAST RETRY 


F SO: BR ; 
‘SEE IF TM STATUS ERROR | 
sIF SO: BR 


;PRINT HEADER 


SEQ 0091 





[RET ‘! 


Pepa ETUC eres Seen Lier ose 








/ p> ee RELIABILITY PROGRAM 


160264 


360114 


MACYL1 27(732) 


ERPTI: 


ERPT2: 


ERPT3: 


ERPT4: 


ERPTS: 


L1-MAR-76 14:46 PAGE 62 


ERETY 


#MSG238 ,R4 
a8A,R2 
#255, T08 
Feb, 
FCER 
ERPTS 
emMSGe3c ,R4 
aFC,R3 
eMSG23A ,R4 
awe ,.R3 
CRCER 


ERPTSA 
#MSGS8, RY 


acc,R3 
#177000,R3 





"* sPRINT WORD COUNT 


;PRINT pa TYPE 
;PRINT F OR R 


;PRINT TM 


;IF NO CONT ERROR: BR 
sPRINT C1 TAG 

;PRINT CONTROL 1 
:PRINT CS TAG 

;PRINT CONT STATUS 

;IF SO DRIVE ERROR: BR 
;PRINT DS TAG 

;PRINT DRIVE STATUS 
;PRINT ER TAG 

;PRINT ORIVE ERROR 

;IF NO BA ERROR: BR 
sPRINT BA TAG 

;PRINT BUS ADDRESS 
;PRINT / 

sPRINT EXPT BUS ADDRESS 
;IF NO FC ERROR: BR 
SPRINT FC TAG | 
;PRINT FRAME COUNT 
SPRINT WC TAG 


;IF NO CRC ERROR: SR 
;PRINT CRC TAG 


;PRINT ACTUAL CRC 





THO2/TULb DATA RELIABILITY PROGRAM MACYIL 27(732) 11-MAR-76 14:46 PAGE 63 
OZTUAF P11 
000255 160010 Moy 4255, T08 
a Fane R3 a 
;PRINT EXPECTED CRC 
RET ;IF NO LAC ERROR: BR 
9,R4 
;PRINT LRC TAG 


ACTLRC, 
_— ;PRINT ACTUAL LAC 


PETG. 


EXLRC,R3 
sPRINT EXPECTED LRC 


;IF NO DRIVE ERROR: BR 

;IF NO PE: BR 

;MASK OUT ALL BUT BITS 15,10,7,6 
;IF NO CONDITIONALS SET: BR 
sPRINT CC TAG 


SSN 
gS Re 


000210 


4285 
Fa <o+@2 
= 

+ 


wo 
— 
oO 


;MASK CC 
sPRINT CHECK CHARACTERS 


;SEE IF STOP ON ERROR 
;IF NOT: BR 


;SEE IF HAVE PRINTED 
;IF SO: BR 

;SEE--IF SHOULD PRINT 
;IF NOT: BR 

sPRINT ERROR 

;ORIVE CLEAR 

;CLEAR AS 


Re 
Be 

on 
Sanintige 


2 
— 
e ) 


Lo] eo] 


—— 
or 


- ——e 


;RESET TRE 
sRESET TC 


;IF NOT READ/WRITE OP: BR 


sIF NOT TH TINE: BR 


z 
gagegessaas 


0e4 
= 
: 
bf: 


MFL 
ee 
eh Bo 


seen 


sEXIT 
;EXPT ADDRESS SAVE 


e 
i 
e327 neeeed 
2329 
: 
Sez 
5439 
s 
s 
= 


B 
2 
: 
: 
: 
: 


Sr Lv 


1 
1 
1 
| 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


b+ B+ bh = b= 


: 
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S 
: 
B 
a 
5 
a 


forofoforurufoforare 


O-+0 20 = b> -b <8 - b= — + —— pp 


NSTRSOR ES? 





LRCER: O 
CRCER: Q 


raueeuensnsnseuscusanaeseseneasuscstasszsaceneraraeaes 
OR FORWARD/R FOR REVERSE PRINT SUBROUTINE: 


rm GE TSH Rotations, o 


seonssasecorensssrssesscesuseseucesacececeueeceeuseses 
032767 000010 157530 ;SEE_IF WRITE COMMAND 


a3 2 ooono2 157520 ; 1 S¢: REVERSE 
IF NOT: BR 


;PRINT R 


s BRENT 
sEXIT 


DATA RELIABILITY PROGRAM MACY11 27(732) 11-MAR-76 14:46 PAGE 65 


s 
Oo 
- 


‘at kipanphae,epmoimes ct Tea 
THIS, SUBROUTINE 18 USED TO EXE 
ole a rei THE 
i eee 
URNED TO THe CALLING 


CEES ¢ 


Be 


. 
: 


: 
: 
: 


o£ 


;PRINT WRITE ERR 


‘PRINT FOR Rr 


;PRINT NO MOL ERR 
;SEE IF PIP RESET 
;IF SO: BR 
sPRINT HEADER 
sPRINT REWINDING MESSAGE 
157200 : 
1 ;AWAIT PIP Resgr 
157340 : :SEE wore wh M 
TAP IF NO 


S8SSs8Sssss 


0 ee 
OO NMUI£CWMH-O 


% 
: 
es 
f 
aie 


rT 


miss CSHS 


ss 
=8 





Me a & DATA RELIABILITY PROGRAM MACYI1 27(732) L1-MAR-76 14:46 PAGE 66 SEQ 0096 


012704 #177777 #-1,R4 ;ELSE SET FC FOR -1 


ee tee nite 


RGSS 


Rees 
ay 

tere 

838 


“N 
i 
= 
4 
w 
~ 


nba sSET WC = F072 FOR NORMAL FORMAT 
F Cone Bum FORMAT 

RY T He = FC/4 FOR CORE DUMP 

eit Lie 


000020 157162 


TAPG3C: 


o— = b= = > ~ b> B= - p— p> p= p— 


SSSR BARR 
w 
% 


fofofofurufofurururorofofororore 


REsSIII See 


ag 


JF ‘e 


co 
a 
3048 BE TAPG3O 
shea Gstuse Beidky COCO AszeNo a fapeio Tee see IF REA , 
305 1434 O01 157072. MOV aMR PSET INTERCHANGE READ MAINT. MODE 
ee felts Glen Ib? rePcso: Hoy HIRD 1 Se 
1 1 BIC #177707, R4 
Be Bie I an eo Taek ae 
ep i 1 177740 8-40, STAL NT may mL TO 40 
3057 rata Sates 000101 157176 TAPG3E: B #101, MTC1 AND GO 
see 1476 O16 157170 157004 MOV  MTC1,aCl ee COMMAND 
3060 21504 005077 : : CLR He *CLEAR PRIORITY 
zee Gei614 Gobet? 1231  TAPGY: i Tent ;SEE IF HAVE TIMED OUT 
1520 001 poate Ne TAPGH ;IF NOT: BR 
oe Oe bes ENE Fapa4 20 H"eelori ty MULTIPLIER 
1 01 000340 157046 TAPGS: MOV #340, aPSW SE 
ae ries ise 002000 157042 et : , aSWR Eat PRINT ERRORS 
1546 001110 PC T INT CYCLE NUMBER 
3070 OelSS2 016704 157074 MOV ___ EMADOR, RY 
Be flee EOS yrree FEO pcsemeer SPRINT PGR 
Nei 01 MOVs aM5G24, R4 
Hoe Os1672 7 100000 157006 TAPGE prourt 7 ISWR ieee Jes HH RAAT ON ERROR 
Oe 160 1401 ; TAPE? , re 
3577 ra 104006 STOPP 
2078 021604 000167 000110 


TAPG7: JMP MTINTA ;RETURN TO CALLING ROUTINE 
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02 Pll 


; TTY INTERRUPT HANDLER ###eee HHH 
156766 TTINT: 
156762 sSEE I 
156752 CHE 74 eek FOR CNTL G 
: TCH REGISTER 
156736 ce :I SOFTWARE SWITCH REGISTER USED 


aTKB CLEAR CNTL G OUT OF BUFFER: 
PC, CNTG : SWREG | 


RETURN: : SE RETURN 
TTINTO: MOV RO, TEMPS : RO(REC CNTR) 
PC’ TINPY :GO GET STALL VALUES 
| Hee ea ueee 
156676. ‘MOV #100, aTKS sRESET INTERRUPT ENABLE 


CLR K RF PER THY sravus 
CMPB ISEE IF CONT.C 


ed oe ee oe oe ee oe 


PEt CRPMOS ERE NES 


N“N 
fe 
fu 


Se aAH SEE SEER REERES 
Foroforururororurururororore fofore 


GH b-~ b= b= b= 2 fH -< pe 


;MAG TAPE INTERRUPT HANDLER#HHERHEHEH 


MTINT: NOP 
CMP (SP)+, (SP)+ sRESET STACK POINTER 
MTINTA: BIC #37, OR :CLEAR MAINT MODE 
IMP JRTRN : RETURN 


3 


PREBRES 





HO8 
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5 EEE EEE EE EEE ata 
;RUTO SEQUENCE 
;THIS ROUTINE ,ENTERED VIA Ene On AL ADDRESS 240 


baits in Bh BE AND ND. Bono 7 10 Th HE MORESELECTED 


; TEST IF NRZ ONLY, PE TESTING WILL NOT BE ATTEMPTED. 
i iGanundesiannarsvasedebantarteeeoees 


#MSG108,R4 


sNAZOF, Rs s3 OF FLAG 
nn or 


iO: 
angel be »R4 
sade CONT OR NOT 


Th »RS di 35 P ein 
ak Tee NT 
Gene DAY HARDWARE CONFIGURATION 


sPRINT DIVIDER 
;PRINT TMO2 NUMBER 
;PRINT TMO2 


Db b= PD b-- b - & op pop > Oo 
Pe 
oO 
y 


Ob bh be hh a 


BRa ways 


sees zag 


UN Seeeeeee 


TY: 
on 
Ray 

N 


res 
#MSG102,R4 
AORVN, R3 

#MSG103,R4 


sPRINT SLAVE HOR 
1,RO :POINT 19 START OF SLAVE TABLE 
SSE FF coe 


o~ 
o 


See 
Sule eee ee 


Q3 
(RO)+,R3 
am pe SLAVE TABLE 


biton pasta wis 
SF aera AUTC SEQ 


SPRINT END OF PASS 


RRRRRRRE 


ee ee ee ee ee ee nos 


: 


o =< > + b> 6 +o = b= b= b— Pb b- B = b  b— 0 0 Bb 0 b> b= = = fb bp Be Fb po bo he pe pe Be bh bs pig 


QERLORE SSH VFHESH-“SSBUKRZERHBBSVRR LOVES 


SRUSRNE TSS 


ue 


ASEQXX; 


foro 
roru 
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;SUBROUTINE TO SELECT AUTO SEQUENCE HARDWARE #e#eeeee 


eat Boene> {BEug wos: CG for oo EOT UNIT CNTR 
ats 012777 000040 1 


an a ny 
Geen) Salsa) wmoso: FER SRL UESGRUE NPIL 


<b b= pe bh pe he pe 


N= fr 
ror 


3 
: 

2169 O22204 000162 +177674 JMP ASEQY $60 GO SEE IF TRIED ALL DRIVES 
31 peesi@ pate 140010 _ ete bir ib Rt TUl6 ire 

1 Bsss4q 1 B HROSO cee IF Be 

otra BS555q DISehy , cy SRNR TART OF SLAVE TABLE 
atte 022230 616077 OPE HRDS2: MOV ate art 

3176 O22234 O32 010000 156260 BIT #10000, a0S ; SEE iF AVAIL FOR TEST(MOL) 
318 tose toseey 156372 sis TEM] TFs FOUND FLAG 

1 10021 MOV RO, (R1)+ sLORO 5 TABL 

180 O22252 022700 000007 HRDS3: CMP #7.R0 see IF ALL SLAVES 
181 O222e56 001402 - BEQ HROS4Y : 

182 Oe2260 005200 INC RO sEL BUMP SLAVE NUMBER 
3183 Oeeeb2 000762 BR HRDS2 “CONTINUE SELECTION 

3184 O22264 005767 156352 HRDS4: TST TEMP “SEE IF FOUND ANY SLAVES 
3185 022270 001744 BEQ "IF NOT: BR 
3186 O22272 016767 156344 162512 MOV TEMP1,REOTC *SET NUMBER OF UNITS 

3! 022300 000367 156336 SWAB = TEMP] 

188 022304 767 156332 162500 BIS TEMP1 .REOTC ;SET EOT CNT 

3189 O22312 012711 177777 ae MOV #-1, (RL) s TERMINATE eave: TABLE 
3190 022316 RTS ;RETURN TO SEQ 


_——_—- - ee - - = 


T 


5 
FS 


Seas GRR SER CoRR SRR PER! 


RREK 


fOforore 
0 CONC UI£OITU 


pes bes pepe 


RS 


Pil 


ma 
7402 


gee 


gee 
wz 
a 
3 


U16 DATA RELIABILITY PROGRAM 
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AMOD1: 
AMODIA: 


AMOD1B: 


AMODIC: 


;SUBROUTINE TO SELECT NRZ AUTO TEST MODExxeeexenees 


BLCNTR 
#UN1, RI 
#1706, (R1)+ 


cae 


t AE NT 
#-1 BARN 
FC, STAUTO 


3 ASSURE BLOCK COUNTER IS 0 

; START OF SLAVE TABLE 

;SET ALL SLAVE TO NRZ,NORM, 00D 
;IF FILLED ALL SLAVES: BR 
sELSE DO ALL 


;GO_ REWIND ALL AVAIL SLAVES 
saet b R OF BLOCKS FOR MODE 1 
’ 


ra C CNTR = 100 

: LE T pr TERN 1 
“ASSURE NO TMK 

3AS' READ 
GO DO AUTO 1 
*SELECT PATTERN 10 
*GO DO PATTERN 10 
SELECT PATTERN 14 
rat 

i Poace To EOT 

;RESET TA BA 
SREPEGT auto RANDOM DATA 


;RETURN TO SEQ 


SEQ 0100 


08 


onset RELIABILITY PROGRAM MACY11 27(732) L1-MAR-76 14:46 PAGE 71 SEQ 0101 


3 
;SUBROUTINE TO SELECT PE AUTO TEST MODExxexxxxxne 


7 teste OB ee 156130 AMODe: TST OOK fs sh, ie NRZ ONLY 


BNE 
156126 © CLR BLCNTR AR BLOCK CNTR 
_ fey jel ys OF SLAVE Tee 


3559 3 Bot y 
ee tee teil eae Se 


44 001 BEQ AMOD28 :IF SO: 
3234 022546 OOS111 COM (R1) 
3235 022550 BR AMOD2A ; CONTINUE 
3236 22552 O11 AMOD2B: COM (R1) 
3237 022554 004767 162246 ISR PC, RWNDA ; REWIND SLAVES 
3238 Ol 000006 156152 MOV #6; ABLCNT sget BUTO 8 OCK COUNT 
eo Teen flere ~aone) ler Yat Bt Recaro 0 
3°41 O2eb02 pts oes cet tee586 MOV 1B BarRN ee PATTERN N10 
3242 022610 767 160456 JSR PC STAUTO 
3243 4 012767 O0001l® 155736 MOV 4 tat PATTERN 14 
3044 Oecbee 004767 160444 ISR PC, STAUTO 
3045 Oecbe6 bierb? 000015 155724 MOV #15. PATRN ;SELECT PATTERN 15 
3 : 0226 eae 180735 156072 aoe eC SAUD sFORCE TO 
eae 12767 177777 155704 MOV #71 BET >SELECT AUTO SO RSHDOM BATA 
3249 O22654 767 160412 JSR PC, STAUTO 
$250 660 000207 AMODeX: RTS RETURN TO- SEQ 


ms ee -— - 


eas DATA RELIABILITY PROGRAM 
dz ll 


005767 


ee; 


177760 
024761 
000400 


000122 
00057e 


155656 


MACY11 27(732) 


5 RHAAARALALA LEA AA RAE LE REAR RA RELALLALLL ALARA LERREEELES 
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; ERROR HEADER PRINT SUBROUTINE: 
THIS ROUTINE IS USED TO PRINT OUT A 


; OF 


PAPRT: 


155574 BIT 
BE 


MO 
PAPRTO: OCTPP 
MO 


1s5552 BIT. 
155572 PAPRTA: HOV 


BR 
PAPRTB: TST 


Fee oe 


OTA 


D PLU 
, THIS BLOCK, THE ao SIZE 


HARAC AND THE 
PLUS THE TAPE E SrReCTION 
ALL NUMBERS N OCTAL. 
PeTeriirtiriiitirtirttitiiiiii tit itiitittitttt titties 


#MSGl2,R4 
DVN, R3 
#MSG11,R4 


UDES, R3 
#177770,R3 


#MSG60,R4 
UDES, R3 
#177770,R3 
#MSG61,R4 
tio UDES 
PAPRTO 
#1,R3 
#MSG62,R4 
UDES,R3 


R 
#177760,R3 
#4SG8,R4 
#400, ISWR 
APRt 

#122, TOB 
PC 


TOG 
PAPRTD 
ASEQF 


OR TYPE 
(FORWARD OR REVERSE 


;PRINT DRIVE HEADER 
;PRINT DRIVE NUMBER 
;PRINT UNIT HEADER 


;PRINT UNIT NUMBER 
PRINT DENSITY TAG 


;PRINT DENSITY 
;PRINT PARITY TAG 


sPRINT PARITY 
:PRINT FORMAT TAG 


;PONTION FORMAT 


sPRINT FORMAT 
sPRINT PATRN TAG 
:SEE IF RANDOM DATA 
SIF NOT: BR 

;PRINT R 


;SEE IF AUTO SEQ 


Wi fe d¥ HO 


TY PARITY af ORMAT 


(NUMBER 
(READ WaTTE, SPACE, ETC) 


SEQ 0102 


/TUL6 DATA RELIABILITY PROGRAM 
OzYoAF. Pr 


bon Po ee 
Onou £ 


aint asad ated 


3 
3321 
= 
= 
. 
a 
3334 
a 
ee 
s 


: 


rats 
aha 


on 
8 


155474 
1SS466 
025034 
1SSS46 
Oe2s04e 


000010 
010000 


155410 
155S2e6 


012136 
1sSSe4 


isss0e 


MACY11 27(732) 


PAPRTC: 
PAPRTD: 


PAPRTY: 
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;IF_ NOT: BR 
tia gyro RANDOM 
;PRINT PATRN NUMBER 


sPRINT BLOCK NO. HEADER 
sPRINT NUMBER 


#MSG13,R4 
BLCNTR,R3 
#MSG14,R4 


R3 
#10,MTCL 
PAPR 


#MSG7,R4 
FMCNT,R3 
R3 
R3 
#1, HORFL 
PC 


sPRINT REC NO. HEADER 
sSEE IF WRITE OPERATION 
ite IF AD REVERSE 

: BR 


SEE IF TAPE MARK TIME 
‘;1F SO: BR 


;IF NOT BACK SPACE: GR 


7a NOT RETRY: BR 
GET NUMBER 


RECORD 


3 PRINT bay NUMBER 
;LOAD DASA (-) 
PRINT DASH (-) 


SPRINT RECORD COUNT 


;PRINT RECORD SIZE HEADER 
;GET CHARACTER COUNT 


;REMOVE TWOS COMPLEMENT 
;PRINT RECORD SIZE 

SET HEADER FLAG 

; RETURN 
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SEQ 0104 


| DON MAGER GEERATOR SIMROLTIN 
a RANDOM NUMBER GENERATOR SUBROUTINE: 
| : nurs SUBROUTINE IS USED TO GENERATE THE RANDOM 
:NUNBERS REQUIRED FOR USE 8S RANDOM DATA, 


aed AND CHARA 
5 EAEaRASaSSERARSSATOERSTEERENETOLIREREREREELEEEEEEEEE 


peace Beever 13e354 13a350 RANG: BOB RANSAV, REN 

4 A eceng? RANSAV ;GET NEW NUMBER 

023262 155340 4 paenv,R SEE TF IF oe TOO BIG 
70 Oe0267 155332 CMP R2, RANSAV ; SEE IF ote TOO SMALL 


0232 
S85 053572 000307 a oi Beat 
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‘TUL6 DATA RELIABILITY PROGRAM 
ote 


steal 





foRORS 


85 


Sane 
o” 
N 


rs 
o 


roel 


Sac 


“I 


oo 
of 
Re 
a 


be 
o£ 


ee 


A 
ae 

85 

TA 


ae 


8= 


Bi sao 
see 


ra 
——O- 
Ran 
=S 


34 
x 
34 
34 
4 
34 
34 


o -0—- b— 0 +b +0 +b pe 


ONMUWN£ WUE 
forurore 


= 
oe 
. 
8 


(ap aoe oo aueenaenrnamcammeeneetrengenasnrat 
Y ENTRY SUBROUTINE: 


ees Sed re 


HECK THEM F 


ie Ee ie WITHIN eae ay 


HE CALLING 


iF AN ouestron RY ILLEGAL OR OUTSIDE THE penttee 
Ge ern a arama, 


: CARRIAGE 


CenZeeese 


s FLLFSLELLALLALHLSALASKRSLSLELAEAS AAA ASLAARALSELEFELAE 
LR TENPL - 3CLEAR FIRST CHARACTER FLAG 
TTINN $90 AD TER 
cnPs #215, 118 bas Fok 
T3 TEMP F ‘RST CHARACTER 
Fi rR or ono VAL 
CMPB TI8 PCP ALES no 0 
0s TRI \ NOT: 
MPB s270 Tle Eeee Fug CHAR IS OPE EREATER THAN 7 
TTRIA :1F NOT: 
TINER sELSE GO TO ERROR 
TEMP :SET FIRST CHARACTER FLAG 
RO > 
ROL RO ;SHIFT 3 LEFT 
CLC 
Bre BO 7770 TIB P ASC 
Bg tia.RO e ge os CHARA TER 
DEC R aie 
BNE T 
CMP RO, Re F \ po MAXIMUM LIMIT 
BLOS  =s«ésT'TR 
an es Ox 
CMP R3, RO ate ERROR MINIMUM LIMIT 
BLOS TRY : : 
IMP TINER iif GO TO ERROR 
MOV RO, (RS) iLO VALUE 
RTS P sEXI 
V #MSG43,R4 
TTOUTT PRINT 
SUB 820, (SP) PRESET "sp TO START OF VALUE ROUTINE 
RTS PC :REDO VALUE ENTRY 








/TUL6 DATA RELIABILITY PROGRAM MACYLL 27(732) 11-MAR-7 C03 
Beet, chew Lctagape 8 seh get 
;TTY READ SUBROUTINE ##eseeeees 


oL 
ECR 


et 


3 
i. 
: 
a3 
am 
za 
: 
: 
: 
a 


TTIN: 


TTINI: K 
dTk8, TI8 


TK 
18 Stee 
PC 
- sTTY OUTPUT SUBROUTINE S#eeenaeeeee 


MOVB (R4)+, TOB 
CMPB 
HP 


#43, TbB 
res 


eee 


ese 
muceyaty 
BSss . 


;00 FILLERS 


Z 
om 


Siernanerne lcm 


S 
™N 
won 
= 


a 

TOK 

Pears 

aRgssass 
RSssysses 


wWewn 


~ 
Sessess 


fe 
# 


ww 
ear 
88 
Or- 
Ue 
rm ~ 





DOS. 
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. sUCTAL OUTPUT SUBROUTINE #eeeeeencese 
000230 OCTP: ghR es ;CLEAR FLAG FOR LEADING ZERO 
00020 OCIPEL: Mov R SEF JF SUMBER, 15 ZERO 
. oc : T : 
sELSE PRINT ZERO 
‘AC 


~” sPOSITION DIGIT 


REE 
E 


;PRINT DIGIT 2 


oO 
-— 


8= 
sedges 
Seer ei fetes pacha 


¥ 
BSPPPASPPPOSLLBSLPIPE 


;PRINT DIGIT 3 


;PRINT DIGIT 4 


SuenEay 


Bee 
3 


PRINT DIGIT 5 


SPRINT SPACE 
3EX xIT 


SaSues 
3 


OCTP3: 


age 
35 


mK 
borhan] 
Ow 
eS 

ne 


OCTPG: 


3 
S233 


888 
S38 
RE tor 3 


wO-DW 
36 


OCTPGO: 
OCTPG1: 


me 
<M 


1 

BS 57e4 
ale 
Be 
ae 
a 
3439 Oe403e 
AS 
ac 
a 
319 Geuie0 
353 54150 


= 
ake 


— ¢FIRST CHAR FLAG 


oO 
a 
a 





TNO2/TU16 DATA RELIASILITY PROGRAM 
DZTUAF P11 


3567 


Oe41S2 110367 154460 
i ' 1S4432 
Deo 
74 000061 
1° 7? 154420 

Oe42e0 001356 
foe Ie 
e4e O04767 177674 

000207 

O242S0 010304 

bE 

Oe42b2 006004 

7 000036 

Ges09 te 009026 

oe bee 

roth 006004 

ak fee, 

oeNse4 004767 000002 

ao es 

Bo476 17727e 
000207 


MACY11 27(732) 


11-MAR-76 14:46 PAGE 78 


;DATA CHARACTER OUTPUT SUBROUTINE S#eeeeaeeees 


DOUT: T 
ake 198 RY ;SET NUMBER TO PRINT 
MOVE 3, {08 
DOUTI: e. grr | 
1s4444 178 #200, T08 
BEQ pouTe 
1S4414 M0 8061, TPE 
1S4404 oure MOV 8060, aTPB 
DOUT3: ROL TOB 
DEC RY 
BNE DOUT! 
RTS P 
DOUTD: MOV TEMP3,R3 
3 ' UT 
nee TEA SCR 
JSR PC, DOUT 
RTS PC 
;TU16 SERIAL NUMBER PRINT SUBROUTINE s#eesee 
SNPT: MOV R3,R4 
slag RY 
AOR ORS 
RY 
a 8 
, PRINT FIRST T 
138 RS INT FIRST DIGI 
For PC, SNPG sPRINT SECOND DIGIT 
MOV R3,R4 
ROR RY 
ROR RY 
ROR RY 
J : PRINT TH GIT 
ise pt» gNPG I IRD DIGI 
ISR PC; SNPG sPRINT FOURTH DIGIT 
154302 SNPG: MOV ‘S60 TOB SE? NUMBER. BASE 
Bs #177760, RS I ett 
BL Pc’ Toe is auito pict 
RTS PC : RETURN 


;CHECK SWITCH REGISTER ROUTINE. CHECKS FOR tG TO ALLOW CHANGING 
iF LOC. 176. 


L_IS BY WAY OF CKSWRR 


; i TOCATIONS USED: 


SEQ 0108 


: 
oe 
—o7 

4 


“o 
~ 


ee 


stn ot 


ONO UI LS WIT O 


enna 


EELS EU EEA ELE ELE PEE 


—8f 
bee 
cs 
bo 
tw 


Oe4646 000207 


in 
Fates 
VO. 


TA RELIABILITY PROGRAM 


154220 


184536 


154220 


177666 


154142 
154134 


154120 
177626 
177610 


154062 
154052 


1S4O16 
177S2e 


153740 


MACYL1 27(732) 


CKSWR: 


6S: 


7$: 
OUT: 


STOP: 


L1-MAR-76 14:46 PAGE 79 


TEMPST: .WORD 5 


C G, SUR 
STB ae : 
NV aTKB, TIB 
BIC #1 ,TI8 

#7, T18 
NV #SCNTG, RY 
TTOUTT aia tat 
TTOUTT : 
me 
y  ASANEW RY 
TTOUTT ‘ 
Sle 
BI no TIB 
CMPB oF" 
BNE 2s 
ag! (SP)+ 
CNTLU 
C #15,TI8 
MOV 
MOV SMCRLF , RY 
TTOUTT 
CMP. 87, COUNT 
eo 
OUT 
CMPB s-« #60, TIB 
BGT $s 
CMPB 0s«#67, TIB 
BGE 6$ 
MOV 8MSG43,R4 
TTOUTT 
nn ee 
Ret SCTENPET 
ASL TEMPST 
ae #70 TEMPST 
DEC COUNT 
i 
Hoy TENPST, , aSWR 
;HALT HANDLER######Hee 
HALT 


CKSWRR 


fh SWITCH REG PRESENT 


ve poe 
D ate 
;IS IT Q’ ie Oaks 


pero. A CHARACTER 


;WAS IT FIRST CHARACTER 
sCHANGE SWR IF NOT FIRST ONE 
sGET OUT 


START OVER IF NOT’LEGAL CHARACTER 


;GET NITTY-GRITTY 
;ONLY WANT & ODIGITS 


;CHANGE SWITCH REGISTER CONTENTS 
PROGRAM é 


: RETURN TO BOoY OF 


sCHECK FOR CONTROL G 


SEG 0109 











SEO 0110 







Ley DATA RELIABILITY PROGRAM 
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DZTUAF .P : 





Oe46S4 000207 RIS PC 


% ; TRAP HANDLER i360 003 88% 
S& 016677 000002 153720 TRAP3O: MOV 2(6), aPSW sADJU 





i Oe + eat Bpp00s BOS ote osr e(6) aCe STURN 2 aCRA +. 

Es Los Ne 120704 Rov ato) ,-( B4o00 - : INE STARTING ADDRESS 
45 1 MOV HES are "360 TO sistout ine . 
46 O24 3532 TABLE: TTOUT 


ie 


. es 


Me a DATA RELIABILITY PROGRAM MACY11 27(732) 11-MAR-76 14:46 PAGE 81 SEO O111 
OZTUAF.P11 
3657 
238 ;ERROR MESSAGESHeeeeeeeteet 
024716 O420S2 020105 O43 MSGI: ASCII /#DE # ae 
Oe4723 04S O35S07 O21440 MSG2: ASCII /%G; #/ 
3664 024730 O4104S 020073 043 MSG3: ASCII /%B; #/ 
024735 O45 O47103 O21440 MSGY: ASCII /%CN #/ 
O2e4742 O53452 20105 O43 MSGS: ASCII /#WE #/ 
$670 GeN747 = OS2 ON2S22 O21WHO MSG: ASCII /#RE 8/ 
37g O2H754 OS10S2 O20123 O43. MSG7: ASCII. /#RS #/ 
354 Dev7b1 052 040520 OSI124 MSGB: ASCII /#PATRN &/ 
3675 Oe4766 020116 043 
we 024771 O40 O47123 O20072 MSG9: .ASCII / SN: &/ 
27 BBur7e bee O42S23 O2i44O MSG1O: .ASCII /#SE # 
3680 OS14S52 O4OS14Y O42S25 MSG1I1: .ASCII /#SLAVE NO. #/ 
$681 OeS012 O47040 Oe7117 del440 
3683 025020 o42045 O42526 MSG12: .ASCII /“DRIVE NO. #/ 
3584 OeS0e O74 e711? Oel40 
386 O2S034 O2S0¥S 047102 21440 MSG13: ASCII /%#BN #/ 
$688 O2S042 051052 C2016 = ON3_ MSGI: ASCII /#RN &/ 
$90 Dest? O45 G20041 Oe0049 MSGIS: .ASCIT /X! BAD RECORD%%#/ 
3691 25054 O20040 Oe0040 d2004 
3692 025062 O41040 O42101 051040 
3693 025070 041505 OS1117 O22504 
3634 OeS07 Oel4HS 
36% 025100 043040 = 043 MSG16: .ASCII / Fa 
$638 025103 = O40 Oe1S22 MSG17: .ASCII / Re/ 
3700 025106 020041 “O47505 020124 MSG20: .ASCII /! EOT NO: #/ 
3701 025114 047516 020072 043 
3703 
3704 025121 OS O47111 Qyese4 MSG21: .ASCII /XINTERCHANGE READ = 4/ 
ve faim Ge Bee Bn 
$707 OeS142 O3bHH0 Oe1440 
$709 G251NG Oe0WS OIL ON2IY MNSGZ2: ASCII /%tILLEGAL BOT: HALT«¥/ 
3710 025154 o40507 020114 047502 
3711 25162 035124 O44040 O46101 
3712 025170 d225e4 043 





pipe us bata RELIABILITY PROGRAM 


13 


14 025173 051503 020061 
025200 


025201 O45 o41S27 oO2144C 
025206 O4104S 020101 043 


OM Iorul 


1 
1 
1 
1 
1 


S888 


3720 
37el 025213 O45 O41506 021440 
37e3 25220 O4144S 031123 021440 
25226 O4204S 020123 043 
37e7 028233 ONS OS1105 021440 
3723 G2S240 ONOWS 020123 043 
3731 G2S24S = OS OHSSO3 021440 
3733 Ges2S2 ON204S 020102 043 
3735 025257 OS OSILIS. 021440 
3737 Oese64 ONeOHS Oe0le4 — 043 
3733 O2S271 OS OHIS2H C2140 
374) O2S276 OSINHS C2016 043 
3743 04S 047041 020117 
3744 025310 O47111 O42524 OSilee 
amie 28316 022504 =: 043 
3747 025323 O45 047041 020117 
378 Oe5330 O7S1S 35114 O4HOND 
$743 OeSs36 46101 043 
3751 025343 O45 051104 050117 
3752 025350 035123 021440 
3784 025354 OSO0NS OMIS11 0S1SI3 
g7e5 Gesabe Ce0d7e = O48 
3757 025365 O45 043 
3758 025367 O45 ~OS2045 030525 
37593 620066 O5e501 O475e4 
3760 O25402 051440 050505 O4e5es 
3761 025410 041516 020105 O42050 
3762 025416 OSei32 04 043055 
3763 Oeste ects] = 
Ves Gesisi Geelle Giiees Goisoe 
3766 O2S442 04 020116 041517 
3767 025450 022514 043 
025455 O45 052045 030525 


MACYLI 27(732) 


MSG23: 


MSG23A: 
MSG23B: 
MSG23C: 
MSG23D: 
MSG23E : 
MSG23F : 
MSG23G: . 
MSG23H: . 
MSG23I: . 


MSG23M: . 


MSG28: 
MSG30: 


MSG31: 


-ASCIT 


-ASCIT 
-ASCII 
-ASCIT 
-ASCIT 
-ASCIT 
-ASCIT 


-ASCIT 


LI-MAR-76 14:46 PAGE 82 


74081 &/ 


SUC 87 

/7BA %/ 

JUFC 87 

/70S2 &/ 

7270S %/ 

“YER 87 

77RS &/ 

77LK &/ 

/7DB 8/ 

7UMR &/ 

/YDT 8/ 

S410 87 

/7SN %/ | 
7Z%4NO INTERRUPT“ 8/ 


7Z4NO MOL: HALT%#/ 


/ZDROPS: #&/ 


JUPICKS: #/ 


Sh8/ 
777TUL6 AUTO SEQUENCE (D2TUA-F)% 


“MAKE ENTRIES IN OCTAL%#/ 


7**TU16 DATA RELIABILITY TEST (OZTUA-F)“MAKE ENTRIES IN OCTAL%#/ 


SEQ Olle 


ed 
~-o 
ta 


eS & 
: 
: 


Retest 
WOnNMWMC WMO 


Bas 


BS 


DATA RELIABILITY PROGRAM = MACYI1 27(732) 11-MAR-76 14:46 PAGE 83 i SEQ 0113 





peeay isos 

25542 1517 

025550 14 ~~ 043 

QSS5S AONE ANGLER 05310) MSG32: .ASCII /“SLAVE NUMBER = 7 
56 «4951105 O3644O 021440 : 


42045 047105 Oy¥E23 MSG33: ASCII /XDENSITY = #/ 
051101 OS2111 MSG3¥: .ASCII /“PARITY = #7 
020075 | ¥ 


OYS O42522 047503 MSG35: .ASCII /“RECORD COUNT 
posice 041440 052517 


t 


sé 
& 
& 
a: 
& 
g 


/7CHARACTER COUNT = #/ 


RE 
pes @ 
oR 

z 

z 

o 


/7PATTERN NUMBER = #/ 


O43516 MSG38: .ASCII /%SINGLE PASS = #/ 


/ZENTER STALLS“READ = #/ 


oseit MSG41: .ASCII /“WRITE = #/ 


as 
8 

OSs Sass ha 
; 


O47122 MSGY2: .ASCII /%TURN AROUND = #/ 
047125 


fo foe 
a8 
w 


2 
3 
é 
z 
2 
& 


SR9R8/ 
026017 7 Se4 MSG44: .ASCII /XENTER YOZ2LE STALL = &/ 
el BH pete 


: 
a 
—o 


& 
5 


3841 


aianmaree 3 


ow 
~ 


a ee 


PARROT 


a 
fo 


BE 


SNRULFSNE 


042445 
0S2115 


043045 


DATA RELIABILITY PROGRAM 


OS1122 O40440 
021440 

020103 043 
040503 021440 


Bias a0 eat 


040510 elie 


O42See 
021440 


042523 OS1040 
020131 043 


MACY11 27(732) 


MSGYS: .ASCIT 
MSG46: ASCII 
MSGH7: ASCII 
MSGH8: ASCII 
MSGH9: ASCII 
MSGSO: .ASCII 
MSGS2: .ASCII 
MSGS3: ASCII 
MSGSY: ASCII 
MSGSS: .ASCII 
MSGS6: ASCII 
MSGS7: . ASCII 
MSGS8: .ASCII 
MSGS9: .ASCII 
: II 

1: II 


MSGb1: :ASC 
MSGbe: | :ASCII 
MSGEY: ©. ASCII 


MSG6S: .ASCII 


MSG6E: .ASCIT 


11-MAR-76 14:46 PAGE 84 
7ZERR AMT 8/7 


/4FC 87 
“HEA 87 
“7%1NO BOT ON REWIND: HALT%#/ 


7 NOT AVAIL #7 | 
/ ILLEGAL DRIVE TYPE #/ 


/7ADRIVE NUMBER = 8/ 


/7FORMAT = 
/*WE TM8/ 
/*SE TM8#/ 


/ TMa/ 
7 NON-EXIST SLAVE®/ 


/ZLRC 87 
S7LRC &/ 


/7*ORIGINAL ERRORES/ 


/ZRETRY: #7 


/*'SE RTRY #7 


SEQ 0114 


TMO2/TU16 DATA RELIABILITY PROGRAM 
DZTUAF P11 


os2 vou | 
042523043 


auasaaggeuaaaayyyy 


oR 
Rae 


DBD DBD OB 
: 
AR 
a 


er 
WO NOUT.£UITM-O 
e 
£ 


: 
n 
RAI? 
8 


SE RCSOS AN TSNEN 


047524 
035124 


Bb 
RR 
foro 
o 
oe 
<= 


MACY11 27(732) 


MSG6?: 


MSGEB: 
MSG63: 


« MSG70: 


MSG71: 


MSG7e: 
MSG73: 
MSG74: 


MSG7S: 
MSG76: 
MSG77: 
MSG78: 


MSG79: 


MSG100: 


MSG101: 


MSG102: 
MSG103: 
MSG104: 


-ASCII 
-ASCIT 
-ASCII 


-ASCIT 


-ASCIT 


-ASCITI 
-ASCIT 
-ASCIT 


-ASCIT 
-ASCII 
-ASCIT 
-ASCIT 


-ASCIT 


-ASCIT 


-ASCIT 


-ASCIT 
-ASCIT 
-ASCIT 


11-MAR-76 14:46 PAGE 8S SEQ 0115 


/*® ERASE #/ 


/ZREREV: 8/7 
/7TAPE MARK = &/ 


4 


7Z4NO DRY FROM REWIND: HALT%#/ 


/ NON-EXIST DRIVE#/ 


/Z7REFWD: #7 
/Z7ATERR: 8/7 
/ZREGISTER START = #/ 


/Y¢NECTOR = 8&7 

/ZDEREV: #/ 

/7DEFWD: &/ 

/Z{NON-RETRYABLE WRITE ERROR: ER #/ 


/ZNON-RETRYABLE READ ERROR: ER #/ 


/Z.°END OF PASS %8/ 
yeti ttt ttt ys vA 


7*TMO2 &/ 
Z*¥SLAVES &/ 
/7AUTO CONT: #/ 


TMO2/TUL6 DATA RELIABILITY PROGRAM 
DZTUAF .P11 


ee cererrrireree 


BRSEISII IGS 


026772 
774 


027014 


SWE a 


SIRSMERSRS 


R 
x 
Bis 


RRR 
BN 
if 
B 


021440 
051 1S 


g 
ee 


ge Ree 
we 


2 2 2eR 
Baer ARNezes 
PAR2 HPPRPARE 
Hecs Sageetak 


a5 RERERT 

pth ide tet tet 

PRRRER PSREROR 
ERe28 ee 


025 
oF 


Ra 
zi 


035124 


? BR 
ge 33 


2 
= 
oul 
™“N 

a er oe oa 


2 

Tw 

bo 
oOmw 


$= bs 


ABR 

Eng 
S22 
Snes 
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MSG1OS: 
MSG106: 


MSGIEA: 


MSG107: 


MSG108: 


MSG110: 


MSG111: 


MSG1 le: 


MSG113: 


MSG114: 


MSG115S: 


MSG116: 


«ASCII 
-ASCIT 


-ASCII 


-ASCIT 


-ASCITI 


-ASCITI 
: .ASCIT 


-ASCIT 
-ASCITI 
-ASCIT 
-ASCIT 
-ASCIT. 


-ASCII 


-ASCIT 
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/7RECOVEREDS/ 
/*'!BAD TAPE OVERFLOWS#/ 


/ZREWIND TAPE; RESTART AT BLOCK ONE#/ 


/%USUNRECOVERABLE BAD SPOT/ 
/7BAD RECORD LEFT ON TAPEX%#/ 


ZZNRZ ONLY: #7 
/*!! POSITION LOST IN RETRY#/ 


/ZSUSPECT BAD TAPE#-/ - 
SUREPEAT: #/ 

/ BAD TAPE SPOTSXB/ © 
4% SOFT: #7 

7% HARD: #7 


/ZATHARD READ ERROR#/ 


/Z{UNIT IS REWINDING: TEST WILL START AT BOT#/ 


SEQ 0116 


hi aati RELIABILITY PROGRAM MACY11 27(732) L1-MAR-76 14:46 PAGE 87 SEQ 0117 


a3eq Sere pet ee 1S07 SCNT ASCII /%tGH/ 

$ ae st pet soe 020075 siue: “BeKtt /YSWR= / 

3997 02744] 040 O47040 OS3S50S SMNEW: .ASCII / NEW= #/ 

3998 Oe7446 020075 043 

3399 0274Si 04s 043 MCRLF: .ASCII /x#/ 

400 74 EVEN 

Oe 027454 Beaded woata: 0 WRITE BUFFER 
4O04 033462 .2. +4004 . 

400s 033462 000000 RDATA: 9 READ BUFFER 


000001 -END 


Es ; smuietaiiiiidisenein 


= eee se z santos 


72 em 
ti Pop mqume miter 52 
EPRI OTe 


SHAE Suae hainonommnaice ver eaoum eee ass 


OOF nd 8 8 ad OF 4 8 4 4 4 4 4 oH OH OY ene ons ang ae ewan ate 
te tatatstetatatatetatat=tat=tatstatetas 


O08 Q-—-uM = 2-2 
ceeetPeeete os SENT AR De Boo ae ee B55 pubiok fEtrone 


SEESSSSSESSSSSSSSS 


naw wooo 
Tt 


~< 


3 


. se 
ZO Ots te a ray oF 
a es at at rerrerererere erererererermret sts eikis —- eee € 5 


para tataratatalntatetatatat-t-tatatatatatutatatutatatatatatatatatatatatatatatatatatatat tetas 


MACY11 27(732) 11 


am eee 
St] B00 ossoccscccesss 


TY PROGRAM 
ABLE 


t 


RELIABIL 
SYMBOL 


eee eiearaaees 


RRR me ee te Cee Ream Kole Kae Keen Roe Roan Ran} 


sgsssssssscousessssssssss 


Sur o-s F ip 
mee eps scarrar ts 


6 DATA 
ll 





ree YS 
DZTUAF . 


: 
2 


x 
& 


ee 


eo 


Fee Bee ORG 


P 
EXCRC 
Ee 
FNCNY 
EEBRT 
COREL 
HeDO 
HROS1 


u 


3 
8 


ie 


eo 


= = b= 02 0 bee b= 0 0 0 bo Be 


3” SBURFREBREB° 


RALAARASAARAL 


“a 


-—o 
“g 


> > b= b&b -- » - 8 -— 6 BH pe 


Fee) leeeikil gal? 


oa 
feo 


Seats 


cf 


iN 
ae 


5 ae 


SERRE 
wedges 


~< 


bP b= = & He 


a 


re 


cS 


a 


ne 


s 
pas 


as 


SORE 
Satan a ai 


8 
e 
PS 
o 
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iro 
Ber BS 


Soe Ns. 


Sore 
See 


ane 
£0 


0-0'0-0-0-0-0-0 
RRRREK 
Pater ters 


a on 


ae 


nm 


S8888888s8sss 
ipetetetetetetetetett be 
Fer Loo EuOnuue 


o00 
——p— 
oul 
rt ia & | 


er 
cue os 


qegggeRenaRasssas 
Satiutat 


888883 
-OO0@OD 


aT 


QOdMO000000 


ereferetereteveterereverers 
Pope Rasen oa Se 


age 
iis 


mea 


QOOO0000D 
8 
e—e 
= 


Spee 


2000 
S000 
fro 
Shoe 


8 8 
sie 


ieee 















i 


‘TU Ta yo PROGRAM MACYL1 27(732) .L1-MAR-76 14:46 PAGE 91 * SEG 0120 
SYMBOL TABLE 


a 
-o 
~ 





8 
% 









geoTe, pray Tepaar ptaey TT gas TER gua 
ae ime Bie: tee 
] TAPG 1604 fs WTER7Z tbh 

Be Mot 3664 n me 0011 
oF Tee eee Het, 03 Hin” e739 
cits let ae Hu es him eas 
pad T ree Oot TrRs pein WIM4 peels 
Sr bas ee gi i iS 
fax TINeR S i Bee ie Oteeis 
RSFR eg TINP leess tne 000750 WA eees 
RSFRX TINPA le2b6 UN3 000752 W4 0056365 
RSFRO oa7e09 TINPB 12306 UN4 4 WHA OoSs64 
RerRe rite TNDES 15 ie eR ie 716 
RSFO Tiee ot UN7 XOR ee 
RSF 1 bled Sy A TINPX 014024 ne 4 XORS ot 
Por TINPO  OQlebe6 UP. 14 YOZ llt 
RSTAL 900572 TINPOA 012704 VECT YOZA 011220 
RTCNT d0f 70¢ eat O1e7e3 we le YO at l226 
RTRN ANNG be T TINPOC 1 WOATA YOZC 112% 
RTYFL 000712 TARLA Bat 013004 WEX 176 YO2 011336 
RTY1 001050 TARIB TINPOE 013030 WRITE 404 yozC 011252 

fo 0010Se pals TINP! 013046 TE o0s424 YO2Z! 011360 
RT 001054 TARYA 1 TINPe 013124 . WRTSB 006640 YOZD 011400 
ie Be aay Titesn Blache rie eat voepe ilege 
' | RTYS 001 ‘STAUTO 7e TINPeC OL See WTS e733 0 Arete 
RTY7 001064 STOP 024650 TINP3 13326 ge YOZD: 11820 
ee RTYB anenee ve = 104006 es A398 TY a6 vase ai igas 
| te Bstee srex Bovis Ths, ooeib Marvin Sose79 voor Ollsee 
Be em ae ls Het. Se at ies ae 
sy Bosses Tre Gea7os 10g Seas tatven esis veer Oilrig 
RWND: 00S232 TAPGO Q2le06b TPOS 014034 WRTY 006474 Yera 000600 
RWNDY O05264 ee fs iS ee oe the 
' RWNDE i 005324 TAPG3 pg is’s TRAP3O Pouee 7432 
RO =%000000 TAPG3A 1342 TSTAL 000576 024454 
R1 =%000001 TAPG3B 021356 | TTIN 023460 033464 






ERRORS DETECTED: 0 
DEFAULT GLOBALS GENERATED: 0 








DATA ye aa 


peruse. 

M:DZTUAF.P11 
ari) macs 
CORE U S) 






E10 
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F 10. 


0 (2 L) / | igk write 


+ , c at ~}, Moms dbmh ay) wt | 
sreeeesente 0000000000700 JOU JOC IOUIU OUND ODUOUDUUOU0 ety 
meee ee eo ‘tat: + + + ttt3-+- 

Ld 


eonnas 
ve + f+ 4 #4 @ 7+ met +, eer. Sy 3 ee > 7.74 

enneonennrnu nurses seat tea tes senee ceases uaseW shite Roveconoooceo TTT: 
{+- Pee +4444 meaqgqqqqqaqaqan 


00dd0O LLL lleeee2ee2e2 p000000000 1 
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